Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv31260
Modified Files:
sandweb.cgi
Log Message:
fixed problem with info browse. Now it runs cvs log on the file
that you click on; next step is to parse that data and return it
through a nice template.
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.66
retrieving revision 1.67
diff -U2 -r1.66 -r1.67
--- sandweb.cgi 2001/11/22 00:57:15 1.66
+++ sandweb.cgi 2001/11/22 01:07:37 1.67
@@ -303,13 +303,12 @@
my $root = $userprefs->{'repository'}->{'root'};
my $sandbox = $userprefs->{'paths'}->{'users_dir'};
+ my $location = "$users_dir/$username";
my $repository = SandWeb::Repository->new(
root => $root,
repo_type => $repo_type,
- sandbox => $sandbox,
+ sandbox => $location,
);
- my $location = "$users_dir/$username";
-
my $filename = $args{'filename'};
my $group;
@@ -330,5 +329,5 @@
print header;
print '<pre>';
- my %return = $repository->status( file => "$location/$filename" );
+ my %return = $repository->log( file => "$filename" );
print $return{'output'};
print '</pre>';
|
