diff options
author | ivan <ivan> | 2006-07-14 01:42:42 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-07-14 01:42:42 +0000 |
commit | 22beb7aa1be0c71984c87fed7982299c315ce254 (patch) | |
tree | c8ba87a2292ede7368302db9e95adb122deceb49 /FS/FS/CurrentUser.pm | |
parent | 484fa24446f613b3371770fb3c3212fd115154f1 (diff) |
add the small FS::CurrentUser::BootstrapUser class for... surprise... bootstrapping
Diffstat (limited to 'FS/FS/CurrentUser.pm')
-rw-r--r-- | FS/FS/CurrentUser.pm | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/FS/FS/CurrentUser.pm b/FS/FS/CurrentUser.pm index 37ed359..a2dfd71 100644 --- a/FS/FS/CurrentUser.pm +++ b/FS/FS/CurrentUser.pm @@ -21,7 +21,9 @@ FS::CurrentUser - Package representing the current user sub load_user { my( $class, $user ) = @_; #, $pass - return "" if $upgrade_hack; + if ( $upgrade_hack ) { + return new FS::CurrentUser::BootstrapUser; + } #return "" if $user =~ /^fs_(queue|selfservice)$/; @@ -49,5 +51,16 @@ Creepy crawlies =cut +package FS::CurrentUser::BootstrapUser; + +sub new { + my $proto = shift; + my $class = ref($proto) || $proto; + my $self = {}; + bless ($self, $class); +} + +sub AUTOLOAD { 1 }; + 1; |