===================================================================
RCS file: /cvs/cvsweb/cvsweb.cgi,v
retrieving revision 4.19
retrieving revision 4.20
diff -u -p -r4.19 -r4.20
--- cvsweb/cvsweb.cgi	2019/11/11 14:56:27	4.19
+++ cvsweb/cvsweb.cgi	2019/11/11 15:46:39	4.20
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: cvsweb.cgi,v 4.19 2019/11/11 14:56:27 schwarze Exp $
+# $Id: cvsweb.cgi,v 4.20 2019/11/11 15:46:39 schwarze Exp $
 # $knu: cvsweb.cgi,v 1.299 2010/11/13 16:37:18 simon
 #
 # cvsweb - a CGI interface to CVS trees.
@@ -62,8 +62,7 @@ use vars qw (
   %alltags %fileinfo %tags @branchnames %nameprinted
   %symrev %revsym @allrevisions %date %author @revdisplayorder
   @revisions %state %difflines %log %branchpoint @revorder $keywordsubstitution
-  $prcgi @prcategories $re_prcategories $prkeyword $re_prkeyword $mancgi
-  $doCheckout $scriptname $scriptwhere
+  $mancgi $doCheckout $scriptname $scriptwhere
   $where $Browser $nofilelinks $maycompress @stickyvars
   $is_links $is_lynx $is_w3m $is_msie $is_mozilla3 $is_textbased
   %input $query $barequery $sortby $bydate $byrev $byauthor
@@ -603,10 +602,6 @@ if (-f $config_cvstree) {
 }
 undef $config_cvstree;
 
-$re_prcategories  = '(?:' . join ('|', @prcategories) . ')' if @prcategories;
-$re_prkeyword     = quotemeta($prkeyword) if defined($prkeyword);
-$prcgi           .= '%s' if defined($prcgi) && $prcgi !~ /%s/;
-
 $fullname         = catfile($cvsroot, $where);
 
 my $rewrite = 0;
@@ -1454,39 +1449,6 @@ sub htmlify($;$)
   }
 
   if ($extra) {
-
-    # get PR #'s as link: "PR#nnnn" "PR: nnnn, ..." "PR nnnn, ..." "bin/nnnn"
-    if (defined($prcgi) && defined($re_prkeyword)) {
-      my $prev;
-
-      do {
-        $prev = $_;
-        $_ = htmlify_sub {
-          s{
-            (\b$re_prkeyword[:\#]?\s*
-             (?:
-              \#?
-              \d+[,\s]\s*
-             )*
-             \#?)
-            (\d+)\b
-           }{
-             $1 . &link($2, sprintf($prcgi, $2))
-           }egix;
-        } $_;
-      } while ($_ ne $prev);
-
-      if (defined($re_prcategories)) {
-        $_ = htmlify_sub {
-          s{
-            (\b$re_prcategories/(\d+)\b)
-           }{
-             &link($1, sprintf($prcgi, $2))
-           }egox;
-        } $_;
-      }
-    }
-
     # get manpage specs as link: "foo.1" "foo(1)"
     if (defined($mancgi)) {
       $_ = htmlify_sub {