From 899f4e24b9be949c21ecd099bc4dee1308174541 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 1 Mar 2019 13:56:56 +0000
Subject: [PATCH] strip spaces

---
 Parse.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Parse.pm b/Parse.pm
index 3102b5f..565a322 100644
--- a/Parse.pm
+++ b/Parse.pm
@@ -52,7 +52,7 @@ sub read_in () {
       $region{$name}{L} = $.;
       if ($dname =~ m{/}) {
 	$dname =~ s{(?<!-)/(?! )}{-/}g;
-	$region{$name}{DisplayName} = [ grep m/./, split m{/}, $dname ];
+	$region{$name}{DisplayName} = [ grep m/./, split m{ */ *}, $dname ];
       } else {
 	$region{$name}{DisplayName} = [ split m{(?<=-)| }, $dname ];
       }
-- 
2.30.2