From: Rob H. <for...@us...> - 2001-12-04 00:46:35
|
Update of /cvsroot/sandweb/sandweb/bin In directory usw-pr-cvs1:/tmp/cvs-serv30348/bin Modified Files: sandweb.cgi Log Message: made the menu key uppercase, so it matches the other params Index: sandweb.cgi =================================================================== RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v retrieving revision 1.82 retrieving revision 1.83 diff -U2 -r1.82 -r1.83 --- sandweb.cgi 2001/12/04 00:43:51 1.82 +++ sandweb.cgi 2001/12/04 00:46:32 1.83 @@ -186,5 +186,5 @@ my %args = @_; - my $content = $ui->get_menu( menu => 'login' ); + my $content = $ui->get_menu( MENU => 'login' ); print header; @@ -373,5 +373,5 @@ my %return = $repository->log( file => "$filename" ); my $content = $ui->get_menu( - menu => "file_info", + MENU => 'file_info', PROGNAME => $progname, LOCATION => $location, @@ -402,5 +402,5 @@ } my $content = $ui->get_menu( - menu => "view_file", + MENU => 'view_file', PROGNAME => $progname, CONTENT => "@tmp", @@ -441,5 +441,5 @@ } my $content = $ui->get_menu( - menu => "edit_file", + MENU => 'edit_file', PROGNAME => $progname, CONTENT => "@tmp", @@ -470,5 +470,5 @@ } my $content = $ui->get_menu( - menu => "create_file", + MENU => 'create_file', PROGNAME => $progname, LOCATION => $location, @@ -498,5 +498,5 @@ my $content = $ui->get_menu( - menu => "create_folder", + MENU => 'create_folder', PROGNAME => $progname, LOCATION => $location, @@ -516,5 +516,5 @@ elsif ( $command eq 'upload' ) { my $content = $ui->get_menu( - menu => "upload_file", + MENU => 'upload_file', LOCATION => $location, PROGNAME => $progname, @@ -534,5 +534,5 @@ elsif ( $command eq 'checkout' ) { my $content = $ui->get_menu( - menu => "checkout", + MENU => 'checkout', LOCATION => $location, PROGNAME => $progname, @@ -610,5 +610,5 @@ ); my $content = $ui->get_menu( - menu => "vcs_output", + MENU => 'vcs_output', LOCATION => $location, PROGNAME => $progname, @@ -629,5 +629,5 @@ } my $content = $ui->get_menu( - menu => "commit", + MENU => 'commit', LOCATION => $location, PROGNAME => $progname, @@ -653,5 +653,5 @@ } my $content = $ui->get_menu( - menu => "vcs_output", + MENU => 'vcs_output', LOCATION => $location, PROGNAME => $progname, @@ -688,5 +688,5 @@ my $content = $ui->get_menu( - menu => 'preferences', + MENU => 'preferences', PROGNAME => $progname, FULL_NAME => $full_name, @@ -722,5 +722,5 @@ my $content = $ui->get_menu( - menu => "vcs_prefs", + MENU => 'vcs_prefs', PROGNAME => $progname, SERVER => $server, |