[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.83,1.84

[Rob H. <for...@us...>]

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

Modified Files:
	sandweb.cgi 
Log Message:

ok, now it's possible to edit your repository preferences, although
you can only have one, it's still a step forward.



Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.83
retrieving revision 1.84
diff -U2 -r1.83 -r1.84
--- sandweb.cgi	2001/12/04 00:46:32	1.83
+++ sandweb.cgi	2001/12/04 01:15:35	1.84
@@ -716,5 +716,7 @@
 	load_prefs(1); # load prefs and do not log error msg
 	my $username = $auth->get_userinfo('username');
+	my $name = $userprefs->{'repository'}->{'name'};
 	my $server = $userprefs->{'repository'}->{'server'};
+	my $vcs_username = $userprefs->{'repository'}->{'username'};
 	my $root = $userprefs->{'repository'}->{'root'};
 	my $repo_type = $userprefs->{'repository'}->{'repo_type'};
@@ -724,5 +726,7 @@
 		MENU => 'vcs_prefs',
 		PROGNAME => $progname,
+		NAME => $name,
 		SERVER => $server,
+		USERNAME => $vcs_username,
 		ROOT => $root,
 	);
@@ -754,5 +758,30 @@
 
 	load_prefs(1); # load prefs and do not log error msg
-	$userprefs->{'personal'}->{'full_name'} = param('full_name');
+	my @personal_params = ( 
+		'full_name', 
+		'work_dir',
+	);
+
+	my @repository_params = (
+		'name',
+		'server',
+		'username',
+		'vcs_type',
+		'connection',
+		'root',
+	);
+
+	foreach my $param (@personal_params) {
+		if ( param("$param") ) {
+			$userprefs->{'personal'}->{"$param"} = param("$param");
+		}
+	}
+
+	foreach my $param (@repository_params) {
+		if ( param("$param") ) {
+			$userprefs->{'repository'}->{"$param"} = param("$param");
+		}
+	}
+		
 	my $username = $auth->get_userinfo('username');
 	# write config data into the .$prefs_config file in the users directory
@@ -771,5 +800,5 @@
 	# when finished go to main menu. (this should be dynamic probably, so it
 	# returns to whichever menu they wanted to go to in the first place).
-	main_menu( cookie => $cookie, );
+	main_menu( cookie => $cookie );	
 }