[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.184,1.185

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

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

Modified Files:
	sandweb.cgi 
Log Message:
* adding support for module_name to browse_menu
* general cleanup on the browse_menu subroutine

this needs changes in Browse.pm ( which i'm not done with ) and browse.html
to work, this checkin breaks the CVS version


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.184
retrieving revision 1.185
diff -U2 -r1.184 -r1.185
--- sandweb.cgi	18 Feb 2002 21:43:52 -0000	1.184
+++ sandweb.cgi	19 Feb 2002 06:23:42 -0000	1.185
@@ -174,4 +174,5 @@
 					ck_auth => $ck_auth,
 					location => $location,
+					module_name => $module_name,
 				);
 			}
@@ -423,4 +424,5 @@
 	my $username = $auth->get_username();
 	my $template_dir = $config->{'paths'}->{'template_dir'};
+	my $module_name = $args{'module_name'};
 	my $users_dir = $config->{'paths'}->{'users_dir'};
 	my $server = $user->{'repository'}->{'server'};
@@ -459,4 +461,5 @@
 					'username' => $username,
 					'template_dir' => $template_dir,
+					'module_name' => $module_name,
 					'users_dir' => $users_dir,
 					'log_obj' => $log,
@@ -477,5 +480,11 @@
 
 	# use the browse object to show user's sandbox
-	my $content = $browse->browse("$location", "$progname", "@vcs_commands", "@file_commands", $repo_type);
+	my $content = $browse->browse(
+		'location' => $location,
+		'progname' => $progname,
+		'vcs_commands' => @vcs_commands,
+		'file_commands' => @file_commands,
+		'repo_type' => $repo_type,
+	);
 
 	print CGI::header( -cookie => $ck_auth );