home/gitolite
2
0
Fork 0
mirror of https://github.com/wahyd4/gitolite.git synced 2026-08-09 04:55:55 +10:00
Code Issues Packages Projects Releases Wiki Activity

auth: expand etc. *may* have single-quotes around reponame

Browse Source
This commit is contained in:
Sitaram Chamarty
2010-03-01 20:34:25 +05:30
parent 8031f72fa8
commit 6dbaa0d325
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/gl-auth-command
+1 -1
View File
@@ -113,7 +113,7 @@ my $CUSTOM_COMMANDS=qr/^\s*(expand|(get|set)(perms|desc))\b/;
if ($ENV{SSH_ORIGINAL_COMMAND} =~ $CUSTOM_COMMANDS) {
die "wildrepos disabled, sorry\n" unless $GL_WILDREPOS;
my $cmd = $ENV{SSH_ORIGINAL_COMMAND};
my ($verb, $repo) = ($cmd =~ /^\s*(\S+)(?:\s+\/?(.*?)(?:.git)?)?$/);
my ($verb, $repo) = ($cmd =~ /^\s*(\S+)(?:\s+'?\/?(.*?)(?:\.git)?'?)?$/);
# deal with "no argument" cases
$verb eq 'expand' ? $repo = '^' : die "$verb needs an argument\n" unless $repo;
if ($repo =~ $REPONAME_PATT and $verb =~ /getperms|setperms/) {