[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.158,1.159

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

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

Modified Files:
	sandweb.cgi 
Log Message:
* repository menu now seems to be fully working. next is to add support to 
check out a module menu.


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.158
retrieving revision 1.159
diff -U2 -r1.158 -r1.159
--- sandweb.cgi	11 Feb 2002 02:02:53 -0000	1.158
+++ sandweb.cgi	11 Feb 2002 02:47:15 -0000	1.159
@@ -1142,4 +1142,11 @@
         # repository selected was 'add new repository'
         # new repository display
+		$repo_name = '';
+        $repo_server = '';
+        $repo_username = '';
+        $repo_connection = '';
+        $repo_type = '';
+        $repo_root = '';
+		
     } elsif ($repository_selected) {
         # display existing repository
@@ -1174,9 +1181,15 @@
     my @loop_repo_type = ();
 
+	$log->debug('@repos: '. join('-', @repos). "\nrepository_selected: '$repository_selected'\n");
     foreach my $repo (@repos) {
+		chomp $repo;
         my %entries;
-        if (($repository_selected eq $repo) && ($repository_selected != $new_string)) {
+		$log->debug("-- REPO: $repository_selected = $repo && $repository_selected != $new_string\n");
+        if ($repository_selected eq $repo) { 
+		# Doesn't seem to work!?? ($repository_selected != $new_string)) {
+		$log->debug("-- REPO: TRUE\n");
             $entries{REPOSITORY_ENTRY} = "<option selected>$repo</option>";
         } else {
+		$log->debug("-- REPO: FALSE\n");
             $entries{REPOSITORY_ENTRY} = "<option>$repo</option>";
         }