summaryrefslogtreecommitdiff
path: root/usr/src/pinyadmin/bin/lsaccess
diff options
context:
space:
mode:
authorJoe Rayhawk <jrayhawk@richardiv.omgwallhack.org>2010-10-30 07:31:35 -0700
committerJoe Rayhawk <jrayhawk@richardiv.omgwallhack.org>2010-10-30 07:31:35 -0700
commitc952a7e6d5e66e2ecd653bb5c177609b59619808 (patch)
treed2be5d0dee505ae00c4b85a5f4129efc2456d5f6 /usr/src/pinyadmin/bin/lsaccess
parentd03e1eb495c79c19dc70bbe8eab81eadce98210a (diff)
parent79c284badd015f88d8fd42d941e30bca70dd4eb9 (diff)
downloadpiny-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-xusr/src/pinyadmin/bin/lsaccess30
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";
- };
- };
-
-};