[Gforge-commits] gforge-plugin-scmcvs/cgi-bin cvsweb, 1.3, 1.4 cvsweb.ori, 1.1, 1.2

[gsmet]

Update of /cvsroot/gforge/gforge-plugin-scmcvs/cgi-bin
In directory db.perdue.net:/tmp/cvs-serv15624/cgi-bin

Modified Files:
        cvsweb cvsweb.ori 
Log Message:
CVSWeb 3.0.2
link to gforge /users/ page

Index: cvsweb
===================================================================
RCS file: /cvsroot/gforge/gforge-plugin-scmcvs/cgi-bin/cvsweb,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- cvsweb      28 Jul 2004 14:14:23 -0000      1.3
+++ cvsweb      23 Sep 2004 21:23:25 -0000      1.4
@@ -45,7 +45,7 @@
 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 # SUCH DAMAGE.
 #
-# $FreeBSD: projects/cvsweb/cvsweb.cgi,v 1.259 2004/05/08 14:13:40 scop Exp $
+# $FreeBSD: projects/cvsweb/cvsweb.cgi,v 1.272 2004/08/20 18:28:44 scop Exp $
 # $Id$
 # $Idaemons: /home/cvs/cvsweb/cvsweb.cgi,v 1.84 2001/10/07 20:50:10 knu Exp $
 #
@@ -69,15 +69,14 @@
   @revisions %state %difflines %log %branchpoint @revorder $keywordsubstitution
   $prcgi @prcategories $re_prcategories $prkeyword $re_prkeyword $mancgi
[...1198 lines suppressed...]
     $ret .= ",\n" if ($ret ne "");
     $ret .= &link(htmlquote($sym),
                   $fileurl . toggleQuery('only_with_tag', $sym));
@@ -4347,6 +4326,16 @@
   return $ret;
 }
 
+sub urlize_author($)
+{
+  my ($author) = @_;
+  if(defined($authorurl_pattern) && $authorurl_pattern && $author ne 'root') {
+       my $authorurl = $authorurl_pattern;
+    $authorurl =~ s|:AUTHOR:|$author|g;
+    $author = $authorurl;
+  }
+  return $author;
+}
 
 #
 # See if a file/dir is listed in the config file's @ForbiddenFiles list.

Index: cvsweb.ori
===================================================================
RCS file: /cvsroot/gforge/gforge-plugin-scmcvs/cgi-bin/cvsweb.ori,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- cvsweb.ori  23 Jul 2004 23:41:49 -0000      1.1
+++ cvsweb.ori  23 Sep 2004 21:23:25 -0000      1.2
@@ -45,7 +45,7 @@
 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 # SUCH DAMAGE.
 #
-# $FreeBSD: projects/cvsweb/cvsweb.cgi,v 1.259 2004/05/08 14:13:40 scop Exp $
+# $FreeBSD: projects/cvsweb/cvsweb.cgi,v 1.272 2004/08/20 18:28:44 scop Exp $
 # $Id$
 # $Idaemons: /home/cvs/cvsweb/cvsweb.cgi,v 1.84 2001/10/07 20:50:10 knu Exp $
 #
@@ -69,14 +69,13 @@
   @revisions %state %difflines %log %branchpoint @revorder $keywordsubstitution
   $prcgi @prcategories $re_prcategories $prkeyword $re_prkeyword $mancgi
[...1148 lines suppressed...]
 
 sub http_header(;$$)
@@ -4316,13 +4296,12 @@
 sub link_tags($)
 {
   my ($tags) = @_;
-  my ($ret)  = "";
-  my ($fileurl, $filename);
 
-  ($filename = $where) =~ s/^.*\///;
-  $fileurl = './' . urlencode($filename);
+  (my $filename = $where) =~ s|^.*/||;
+  my $fileurl = './' . uri_escape($filename);
 
-  foreach my $sym (split (", ", $tags)) {
+  my $ret = "";
+  foreach my $sym (split(", ", $tags)) {
     $ret .= ",\n" if ($ret ne "");
     $ret .= &link(htmlquote($sym),
                   $fileurl . toggleQuery('only_with_tag', $sym));