os/doc
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

shut up perl -T warnings

Browse source
This commit is contained in:
Wolfram Schneider 2007-03-19 18:13:51 +00:00
parent 99c167417c
commit 6521689fb7
Notes: svn2git 2020-12-08 03:00:23 +00:00 
svn path=/www/; revision=29842
1 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

7
en/cgi/url.cgi
View file

@ -26,10 +26,12 @@
# #
# url.cgi - make plain text URLs clickable # url.cgi - make plain text URLs clickable
# #
# $FreeBSD: www/en/cgi/url.cgi,v 1.34 2005/10/20 20:03:36 fenner Exp $ # $FreeBSD: www/en/cgi/url.cgi,v 1.35 2007/03/19 17:52:39 wosch Exp $
use strict; use strict;
$ENV{"PATH"} = "/bin:/usr/bin";
$main::hsty_email = 'ports@FreeBSD.org'; $main::hsty_email = 'ports@FreeBSD.org';
# shutup perl -w # shutup perl -w
@ -64,6 +66,9 @@ if ($file =~ m%^ports/([\w\-]+)/(\w[\w\-+.]+)/pkg-descr%) {
print &html_header( print &html_header(
"Port description for $1/$2"); "Port description for $1/$2");
$portcategory = $1; $portcategory = $1;
# XXX: shut up perl -T warnings
$file = qq{ports/$1/$2/pkg-descr};
} else { } else {
print &short_html_header($file); print &short_html_header($file);
} }