Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv13594/bin
Modified Files:
sandweb.cgi
Log Message:
current_location is now a public method of Browse
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.198
retrieving revision 1.199
diff -U2 -r1.198 -r1.199
--- sandweb.cgi 22 Feb 2002 04:48:23 -0000 1.198
+++ sandweb.cgi 22 Feb 2002 08:10:54 -0000 1.199
@@ -495,4 +495,10 @@
'repo_name' => $repo_name,
);
+
+ my $current_location = $browse->get_current_location(
+ 'location' => $location,
+ 'progname' => $progname,
+ 'repo_name' => $repo_name,
+ );
my $browser = $browse->get_browser(
@@ -503,5 +509,5 @@
);
- my $content = "$toolbar $browser";
+ my $content = "$toolbar $current_location $browser";
print CGI::header( -cookie => $ck_auth );
|