From ab08391a42cb9a8e0d9023525f60f73ef848d17e Mon Sep 17 00:00:00 2001 From: Julian Blake Kongslie Date: Thu, 18 Mar 2010 13:56:03 -0700 Subject: Moved the various administrative scripts into Debian packaging. --- usr/local/sbin/rmaccess | 19 ------------------- 1 file changed, 19 deletions(-) delete mode 100755 usr/local/sbin/rmaccess (limited to 'usr/local/sbin/rmaccess') diff --git a/usr/local/sbin/rmaccess b/usr/local/sbin/rmaccess deleted file mode 100755 index f84fba0..0000000 --- a/usr/local/sbin/rmaccess +++ /dev/null @@ -1,19 +0,0 @@ -#!/usr/bin/perl - -use strict; -use warnings; - -use Piny; - -my $env = Piny::Environment->new( ); - -my ( $reponame, @users ) = @ARGV; - -my $repo = Piny::Repo->new( $reponame ); - -if ( $repo->owner->uid != $env->user->uid ) { - print "You are not the owner of that repo!\n"; - exit( 3 ); -}; - -$repo->remove_access( map { Piny::User->new( $_ ) } @users ); -- cgit v1.2.3