Dots a vaild parts of a port name (shudder).

E.g.: ports/russian/elm.language

Submitted by:  Igor Roshchin <igor@physics.uiuc.edu>
This commit is contained in:
Wolfram Schneider 1998-12-06 11:47:43 +00:00
parent 01c720092e
commit 5bd3311185
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/www/; revision=3878

View file

@ -26,7 +26,7 @@
#
# url.cgi - make plain text URLs clickable
#
# $Id: url.cgi,v 1.10 1998-11-03 11:47:27 wosch Exp $
# $Id: url.cgi,v 1.11 1998-12-06 11:47:43 wosch Exp $
#require LWP::UserAgent;
@ -52,7 +52,7 @@ if (1) {
my($cvsroot) = '/home/ncvs';
$file =~ s%(http|ftp)://ftp.freebsd.org/pub/FreeBSD/FreeBSD-current/%%;
print &short_html_header($file);
if ($file =~ m%^ports/[\w-]+/[\w-+]+/pkg/DESCR% &&
if ($file =~ m%^ports/[\w-]+/\w[\w-+.]+/pkg/DESCR% &&
-f "$cvsroot/$file,v") {
open(CO, "-|") || exec ('/usr/bin/co', '-p', '-q', "$cvsroot/$file,v");
} else {