Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv5035
Modified Files:
sandweb.cgi
Log Message:
* the repository menu now displays relevant info for selected repo
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.157
retrieving revision 1.158
diff -U2 -r1.157 -r1.158
--- sandweb.cgi 11 Feb 2002 00:27:32 -0000 1.157
+++ sandweb.cgi 11 Feb 2002 02:02:53 -0000 1.158
@@ -1120,4 +1120,6 @@
$log->debug("<pre>" . Dumper(\%{$user->{'repo'}}) . "</pre>");
+ $repository_selected = $repository_selected || $repos[0] || $new_string; # default for pulldown
+
if (($repository_selected) && ($repository_selected != $new_string)) {
my $valid = 0;
@@ -1142,14 +1144,15 @@
} elsif ($repository_selected) {
# display existing repository
+ $repo_name = $repository_selected;
$repo_server =
- $user->{'repo'}->{$repository_selected}->{'repo_server'};
+ $user->{'repo'}->{$repository_selected}->{'server'};
$repo_username =
- $user->{'repo'}->{$repository_selected}->{'repo_username'};
+ $user->{'repo'}->{$repository_selected}->{'username'};
$repo_connection =
- $user->{'repo'}->{$repository_selected}->{'repo_connection'};
+ $user->{'repo'}->{$repository_selected}->{'connection'};
$repo_type =
- $user->{'repo'}->{$repository_selected}->{'repo_type'};
+ $user->{'repo'}->{$repository_selected}->{'type'};
$repo_root =
- $user->{'repo'}->{$repository_selected}->{'repo_root'};
+ $user->{'repo'}->{$repository_selected}->{'root'};
}
@@ -1165,5 +1168,4 @@
my @connections = $repository->get_connections();
my @repo_types = $repository->get_repo_types();
- $repository_selected = ($repository_selected) ? $repository_selected : $repos[0]; # default for pulldown
# loop data
|
