Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv28554/bin
Modified Files:
sandweb.cgi
Log Message:
fixed stupid bug, last checkin for the night :P
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.202
retrieving revision 1.203
diff -U2 -r1.202 -r1.203
--- sandweb.cgi 22 Feb 2002 08:53:36 -0000 1.202
+++ sandweb.cgi 22 Feb 2002 09:14:13 -0000 1.203
@@ -492,7 +492,4 @@
my $browse_module_header = $ui->get_menu(
MENU => 'browse_module_header',
- MODULE_NAME => $module_name,
- REPO_NAME => $repo_name,
- LOCATION => $location,
);
@@ -962,5 +959,4 @@
);
-
my $menu = $ui->get_menu(
MENU => 'view_file',
@@ -1265,4 +1261,5 @@
VCS_ERROR => "@vcs_error",
);
+
print CGI::header( -cookie => $ck_auth );
$ui->print_screen(
@@ -1308,22 +1305,24 @@
}
}
+
my $content = $ui->get_menu(
- MENU => 'vcs_output',
- LOCATION => $location,
- FILENAME => "@filename",
- PROGNAME => $progname,
- VCS_OUTPUT => "@vcs_output",
- VCS_ERROR => "@vcs_error",
- );
- print CGI::header( -cookie => $ck_auth );
- $ui->print_screen(
- TITLE=> "SandWeb : VCS $vcs_command",
- MENU_TITLE => 'SandWeb',
- SUBMENU_TITLE => "VCS $vcs_command",
- FOOTER => '',
- CONTENT => $content,
- ERROR => $error,
- );
- exit 0;
+ MENU => 'vcs_output',
+ LOCATION => $location,
+ FILENAME => "@filename",
+ PROGNAME => $progname,
+ VCS_OUTPUT => "@vcs_output",
+ VCS_ERROR => "@vcs_error",
+ );
+
+ print CGI::header( -cookie => $ck_auth );
+ $ui->print_screen(
+ TITLE=> "SandWeb : VCS $vcs_command",
+ MENU_TITLE => 'SandWeb',
+ SUBMENU_TITLE => "VCS $vcs_command",
+ FOOTER => '',
+ CONTENT => $content,
+ ERROR => $error,
+ );
+ exit 0;
}
|