diff options
author | Joe Rayhawk <jrayhawk@richardiv.omgwallhack.org> | 2010-10-30 07:31:35 -0700 |
---|---|---|
committer | Joe Rayhawk <jrayhawk@richardiv.omgwallhack.org> | 2010-10-30 07:31:35 -0700 |
commit | c952a7e6d5e66e2ecd653bb5c177609b59619808 (patch) | |
tree | d2be5d0dee505ae00c4b85a5f4129efc2456d5f6 /usr/src/pinyadmin/bin/lsaccess | |
parent | d03e1eb495c79c19dc70bbe8eab81eadce98210a (diff) | |
parent | 79c284badd015f88d8fd42d941e30bca70dd4eb9 (diff) | |
download | piny-code-c952a7e6d5e66e2ecd653bb5c177609b59619808.tar.gz piny-code-c952a7e6d5e66e2ecd653bb5c177609b59619808.zip |
Merge branch 'master' of piny.be:/srv/git/piny-code
Diffstat (limited to 'usr/src/pinyadmin/bin/lsaccess')
-rwxr-xr-x | usr/src/pinyadmin/bin/lsaccess | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/usr/src/pinyadmin/bin/lsaccess b/usr/src/pinyadmin/bin/lsaccess deleted file mode 100755 index ce41fc4..0000000 --- a/usr/src/pinyadmin/bin/lsaccess +++ /dev/null @@ -1,30 +0,0 @@ -#!/usr/bin/perl - -use strict; -use warnings; - -use Piny; - -my $env = Piny::Environment->instance( ); - -my ( $reponame ) = @ARGV; - -if ( defined $reponame ) { - - my $repo = Piny::Repo->new( $reponame ); - - foreach my $user ( Piny::User->all_users( ) ) { - if ( $repo->has_access( $user ) ) { - print $user->name . "\n"; - }; - }; - -} else { - - foreach my $repo ( Piny::Repo->all_repos( ) ) { - if ( $repo->has_access( $env->user ) ) { - print $repo->name . "\n"; - }; - }; - -}; |