[freeside-commits] freeside/FS/FS CurrentUser.pm, 1.2, 1.3 UID.pm, 1.29, 1.30

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv1637

Modified Files:
	CurrentUser.pm UID.pm 
Log Message:
add the small FS::CurrentUser::BootstrapUser class for... surprise... bootstrapping

Index: CurrentUser.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/CurrentUser.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- CurrentUser.pm	19 Jun 2006 12:15:32 -0000	1.2
+++ CurrentUser.pm	14 Jul 2006 01:42:42 -0000	1.3
@@ -21,7 +21,9 @@
 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 @@
 
 =cut
 
+package FS::CurrentUser::BootstrapUser;
+
+sub new {
+  my $proto = shift;
+  my $class = ref($proto) || $proto;
+  my $self = {};
+  bless ($self, $class);
+}
+
+sub AUTOLOAD { 1 };
+
 1;
 

Index: UID.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/UID.pm,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- UID.pm	14 Jul 2006 00:32:11 -0000	1.29
+++ UID.pm	14 Jul 2006 01:42:42 -0000	1.30
@@ -74,7 +74,7 @@
   $user = shift;
 
   if ( $FS::CurrentUser::upgrade_hack ) {
-    $user = '';
+    $user = 'fs_bootstrap';
   } else {
     croak "fatal: adminsuidsetup called without arguements" unless $user;