X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FUID.pm;h=15f15a171c8bc01b390e7801759fe52b2a0e3c87;hp=87830cb0469468b718bdf67ca058bdb9648f0805;hb=98567e531e90ee1c7c195d5f1e708898d47a8452;hpb=251c436ab3d9b79d74ab4fc9af05aac4acf26489 diff --git a/FS/FS/UID.pm b/FS/FS/UID.pm index 87830cb04..15f15a171 100644 --- a/FS/FS/UID.pm +++ b/FS/FS/UID.pm @@ -83,7 +83,7 @@ sub forksuidsetup { $ENV{'ENV'} = ''; $ENV{'BASH_ENV'} = ''; - croak "Not running uid freeside!" unless checkeuid(); + croak "Not running uid freeside!" unless checkeuid() || !$>; getsecrets; $dbh = DBI->connect($datasrc,$db_user,$db_pass, { 'AutoCommit' => 0, @@ -92,7 +92,7 @@ sub forksuidsetup { foreach ( keys %callback ) { &{$callback{$_}}; - delete $callback{$_}; #run once + # breaks multi-database installs # delete $callback{$_}; #run once } $dbh; @@ -256,7 +256,7 @@ coderef into the hash %FS::UID::callback : =head1 VERSION -$Id: UID.pm,v 1.15 2002-06-14 09:19:33 ivan Exp $ +$Id: UID.pm,v 1.17 2002-07-03 11:10:12 ivan Exp $ =head1 BUGS