diff options
| author |   Sitaram Chamarty <sitaram@atc.tcs.com> | 2012-03-15 20:04:30 +0530 |
|---|---|---|
| committer | Sitaram Chamarty <sitaram@atc.tcs.com> | 2012-03-24 10:30:43 +0530 |
| commit | 8714b77eae6b80287b36d532e1b16bb7045a80e6 (patch) | |
| tree | e506d3768686d156f5e49ddc24c82740d59c5f78 /src/commands/info | |
| parent | record and maintain a 'version' (for info and elsewhere) (diff) | |
| download | gitolite-gentoo-8714b77eae6b80287b36d532e1b16bb7045a80e6.tar.gz gitolite-gentoo-8714b77eae6b80287b36d532e1b16bb7045a80e6.tar.bz2 gitolite-gentoo-8714b77eae6b80287b36d532e1b16bb7045a80e6.zip | |
(perltidy)
Diffstat (limited to 'src/commands/info')
| -rwxr-xr-x | src/commands/info | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/commands/info b/src/commands/info index 726b0d8..65e7f30 100755 --- a/src/commands/info +++ b/src/commands/info @@ -19,7 +19,7 @@ usage() if @ARGV; my $user = $ENV{GL_USER} or _die "GL_USER not set"; my $ref = 'any'; -print "hello $user, this is gitolite3 " . version() . " on git " . substr(`git --version`, 12) . "\n"; +print "hello $user, this is gitolite3 " . version() . " on git " . substr( `git --version`, 12 ) . "\n"; my $lr = lister_dispatch('list-repos'); my $lm = lister_dispatch('list-members'); @@ -27,7 +27,7 @@ my $lm = lister_dispatch('list-members'); for ( @{ $lr->() } ) { my $perm = ''; for my $aa (qw(R W ^C)) { - my $ret = access($_, $user, $aa, $ref); + my $ret = access( $_, $user, $aa, $ref ); $perm .= ( $ret =~ /DENIED/ ? " " : " $aa" ); } next unless $perm =~ /\S/; |