===================================================================
RCS file: /cvs/cvsweb/cvsweb.cgi,v
retrieving revision 3.7
retrieving revision 3.8
diff -u -p -r3.7 -r3.8
--- cvsweb/cvsweb.cgi 2000/07/29 09:24:14 3.7
+++ cvsweb/cvsweb.cgi 2000/07/29 12:10:40 3.8
@@ -41,7 +41,8 @@
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE.
#
-# $Id: cvsweb.cgi,v 3.7 2000/07/29 09:24:14 knu Exp $
+# $zId: cvsweb.cgi,v 1.93 2000/07/27 17:42:28 hzeller Exp $
+# $Id: cvsweb.cgi,v 3.8 2000/07/29 12:10:40 knu Exp $
#
###
@@ -854,8 +855,8 @@ sub htmlify {
# get #PR as link ..
if ($pr && defined($prcgi)) {
- 1 while $string =~ s`\b(pr[:#]?\s*(?:#?\d+[,\s]\s*)*#?)(\d+)\b`$1$2`i;
- $string =~ s`\b${prcategories}/(\d+)\b`$&`igo;
+ 1 while $string =~ s`\b(pr[:#]?\s*(?:#?\d+[,\s]\s*)*#?)(\d+)\b`$1$2`i;
+ $string =~ s`\b${prcategories}/(\d+)\b`$&`igo;
}
return $string;
@@ -2329,7 +2330,7 @@ sub navigateHeader ($$$$$) {
$swhere = urlencode($filename) if ($swhere eq "");
print "<\!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">";
print "\n\n";
- print '';
+ print '';
print "\n$path$filename - $title - $rev\n";
print "\n";
print "";
@@ -2683,7 +2684,7 @@ sub http_header {
sub html_header($) {
my ($title) = @_;
- my $version = '$Revision: 3.7 $';
+ my $version = '$Revision: 3.8 $';
http_header();
print <