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 );
|
