summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2006-06-19 12:22:09 +0000
committerivan <ivan>2006-06-19 12:22:09 +0000
commit637378f8fa3c8d76a009cbf92984cdfb571cc5ee (patch)
treebd49e204f289c301112a76342791eb601f0c1a76
parent1ed201c9f897f768e3ec8b9e7aee0fcb8b2bfed1 (diff)
ACL bootstrapping
-rwxr-xr-xbin/mapsecrets2access_user2
1 files changed, 2 insertions, 0 deletions
diff --git a/bin/mapsecrets2access_user b/bin/mapsecrets2access_user
index 934cd76..b34e032 100755
--- a/bin/mapsecrets2access_user
+++ b/bin/mapsecrets2access_user
@@ -3,6 +3,7 @@
use strict;
use File::Copy "cp";
use FS::UID qw(adminsuidsetup);
+use FS::CurrentUser;
use FS::AccessRight;
use FS::Record qw(qsearchs qsearch);
use FS::access_group;
@@ -12,6 +13,7 @@ use FS::access_right;
use FS::access_groupagent;
use FS::agent;
+$FS::CurrentUser::upgrade_hack = 1;
adminsuidsetup shift;
my $supergroup = qsearchs('access_group', { 'groupname' => 'Superuser' } );