dgit-repos-server: wip, unpack regexp a bit

diff --git a/dgit-repos-server b/dgit-repos-server
index 5055de63bc44b939dbd44e4bc683056507f9b4c7..31a44f3fe75c9f384c50e6f7633b085e7052b3e9 100644 (file)
--- a/dgit-repos-server
+++ b/dgit-repos-server
@@ -427,11 +427,11 @@ sub parseargsdispatch () {
     my $cmd = $ENV{'SSH_ORIGINAL_COMMAND'};
     $cmd =~ m{
        ^
-       (?:\S*/)?
-       ([-0-9a-z]+)
+       (?: \S* / )?
+       ( [-0-9a-z]+ )
        \s+
-       (?:\S*/)?
-       ($package_re)\.git
+       (?: \S* / )?
+       ($package_re) \.git
        $
     }ox 
     or reject "command string not understood";