[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.176,1.177

[Nick J. <nje...@us...>]

Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv15656/bin

Modified Files:
	sandweb.cgi 
Log Message:
* changed $auth->get_userinfo('username') to $auth->get_username();


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.176
retrieving revision 1.177
diff -U2 -r1.176 -r1.177
--- sandweb.cgi	18 Feb 2002 10:41:05 -0000	1.176
+++ sandweb.cgi	18 Feb 2002 10:44:58 -0000	1.177
@@ -384,5 +384,5 @@
 	);
 
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	print CGI::header( -cookie => $ck_auth );
 	$ui->print_screen(
@@ -419,5 +419,5 @@
 	}
 	#XXX - not accessing $user->{'repo'}->{$repo_name}*
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	my $template_dir = $config->{'paths'}->{'template_dir'};
 	my $users_dir = $config->{'paths'}->{'users_dir'};
@@ -468,5 +468,5 @@
 	);
 
-	$username = $auth->get_userinfo('username');
+	$username = $auth->get_username();
 	my @vcs_commands = $repository->get_vcs_commands();
 	my @file_commands = $file->get_file_commands();
@@ -503,5 +503,6 @@
 
 	load_config(1); # load prefs and do not log error msg
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
+	# XXX - username();
 	my $full_name = $user->get_full_name();
 	my $work_dir = $user->get_work_dir();
@@ -561,5 +562,5 @@
 
     my $new_string = 'Add a new repository';
-    my $username = $auth->get_userinfo('username');
+    my $username = $auth->get_username();
     my $users_dir = $config->{'paths'}->{'users_dir'};
     my @repos = $user->get_repo_list(); # get list of repositories
@@ -745,5 +746,5 @@
 	$log->debug("filename(s) : $filename");
 	my $save = CGI::param('save');
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	my $template_dir = $config->{'paths'}->{'template_dir'};
 	my $users_dir = $config->{'paths'}->{'users_dir'};
@@ -1108,5 +1109,5 @@
 	my $location = $args{'location'};
 	my $message = CGI::param('message');
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	my $template_dir = $config->{'paths'}->{'template_dir'};
 	my $users_dir = $config->{'paths'}->{'users_dir'};
@@ -1263,5 +1264,5 @@
 	}
 
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	my $template_dir = $config->{'paths'}->{'template_dir'};
 	my $users_dir = $config->{'paths'}->{'users_dir'};
@@ -1343,5 +1344,5 @@
 	}
 
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	# write config data into the .$user_cfg file in the users directory
 	$log->debug('dump', $user);
@@ -1396,5 +1397,5 @@
 	$user->{'repo'}->{$repo_name}->{'module_list'} = [];
 
-#    my $username = $auth->get_userinfo('username');
+#    my $username = $auth->get_username();
 #    # write config data into the .$user_cfg file in the users directory
 #	$log->debug("pre-write\n");
@@ -1436,5 +1437,5 @@
 sub load_config {
 	my $no_error = shift;
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	if (! -f "$config->{'paths'}->{'users_dir'}/$username/.$user_cfg") {
 		# user doesn't have a preferences file!
@@ -1500,5 +1501,5 @@
 sub write_config {
     $log->debug("write_config()");
-	my $username = $auth->get_userinfo('username');
+	my $username = $auth->get_username();
 	# write config data into the .$user_cfg file in the users directory
 	$log->debug('dump', $user);