[Openinteract-commits] CVS: OpenInteract/pkg/base_user/OpenInteract/SQLInstall User.pm,1.4,1.5

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract/pkg/base_user/OpenInteract/SQLInstall
In directory usw-pr-cvs1:/tmp/cvs-serv25485/pkg/base_user/OpenInteract/SQLInstall

Modified Files:
	User.pm 
Log Message:
modify to reflect server configuration file changes


Index: User.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract/pkg/base_user/OpenInteract/SQLInstall/User.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** User.pm	2001/08/12 14:45:42	1.4
--- User.pm	2001/10/17 04:47:08	1.5
***************
*** 36,40 ****
                     ok     => 1 };
      my $CONFIG = $R->CONFIG;
!     my $user = $R->user->new({ email      => $CONFIG->{admin_email},
                                 login_name => 'superuser',
                                 first_name => 'Super',
--- 36,40 ----
                     ok     => 1 };
      my $CONFIG = $R->CONFIG;
!     my $user = $R->user->new({ email      => $CONFIG->{mail}{admin_email} || $CONFIG->{admin_email},
                                 login_name => 'superuser',
                                 first_name => 'Super',