Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv15491/bin
Modified Files:
sandweb.cgi
Log Message:
* modified menu popup title a bit
* added HTTP_REFERER setting to print_popup()
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.243
retrieving revision 1.244
diff -U2 -r1.243 -r1.244
--- sandweb.cgi 1 Mar 2002 08:33:38 -0000 1.243
+++ sandweb.cgi 2 Mar 2002 08:15:27 -0000 1.244
@@ -1874,9 +1874,13 @@
);
+ $log->debug("HTTP_REFERER: $ENV{'HTTP_REFERER'}");
+ my $prev_url = "$ENV{'HTTP_REFERER'}";
+ $log->debug("prev_url $prev_url");
print CGI::header( -cookie => $ck_auth );
$ui->print_popup(
- TITLE=> "SandWeb : sandbox",
+ TITLE=> "SandWeb : vcs output",
MENU_TITLE => 'SandWeb',
- SUBMENU_TITLE => "sandbox",
+ SUBMENU_TITLE => "vcs output",
+ PREVIOUS_URL => $prev_url,
FOOTER => '',
CONTENT => $content,
|
