=================================================================== RCS file: /cvs/cvsweb/cvsweb.cgi,v retrieving revision 1.25 retrieving revision 1.29 diff -u -p -r1.25 -r1.29 --- cvsweb/cvsweb.cgi 1998/08/24 16:41:42 1.25 +++ cvsweb/cvsweb.cgi 1999/01/13 03:59:04 1.29 @@ -28,7 +28,7 @@ # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # SUCH DAMAGE. # -# $fId: cvsweb.cgi,v 1.24 1998/08/16 13:45:12 wosch Exp $ +# $fId: cvsweb.cgi,v 1.28 1999/01/01 02:42:36 hoek Exp $ # @@ -71,7 +71,7 @@ require 'cgi-style.pl'; %mirrors = ( 'Germany', 'http://www.de.freebsd.org/cgi/cvsweb.cgi', - 'Japan', 'http://www.jp.freebsd.org/www.freebsd.org/cgi/cvsweb.cgi', + 'Japan', 'http://www.jp.freebsd.org/cgi/cvsweb.cgi', ); $cvstreedefault = 'freebsd'; @@ -153,7 +153,7 @@ if (!-d $cvsroot) { } } if ($#foo > 1) { - $intro .= "
\nThis script support the following CVS trees:\n"; + $intro .= "
\nThis script supports the following CVS trees:\n";
for($i = 0; $i <= $#foo; $i++) {
$intro .= qq{} .
($CVSROOTdescr{$foo[$i]} ?
@@ -327,7 +327,7 @@ sub htmlify {
$string =~ s/>/>/g;
if ($pr) {
- $string =~ s|\bpr(\W+[a-z]+/\W*)(\d+)|$&|ig;
+ $string =~ s!\b((pr[:#]?\s*#?)|((bin|conf|docs|gnu|i386|kern|misc|ports)\/))(\d+)\b!$&!ig;
}
$string;
@@ -427,7 +427,9 @@ sub checkout {
"Unexpected output from co: $_");
}
$_ =