Date: Mon, 19 Jan 2026 09:50:10 +0000 From: Wolfram Schneider <wosch@FreeBSD.org> To: doc-committers@FreeBSD.org, dev-commits-doc-all@FreeBSD.org Subject: git: a38a04e231 - main - ports.cgi: no perl warnings Message-ID: <696dfe52.24bb8.5a43561f@gitrepo.freebsd.org>
index | next in thread | raw e-mail
The branch main has been updated by wosch: URL: https://cgit.FreeBSD.org/doc/commit/?id=a38a04e231c65ccd9cec2e11f7b4d73a420f64d7 commit a38a04e231c65ccd9cec2e11f7b4d73a420f64d7 Author: Wolfram Schneider <wosch@FreeBSD.org> AuthorDate: 2026-01-19 09:49:57 +0000 Commit: Wolfram Schneider <wosch@FreeBSD.org> CommitDate: 2026-01-19 09:49:57 +0000 ports.cgi: no perl warnings --- website/content/en/cgi/ports.cgi | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/website/content/en/cgi/ports.cgi b/website/content/en/cgi/ports.cgi index c842df6e5d..4260a89b37 100755 --- a/website/content/en/cgi/ports.cgi +++ b/website/content/en/cgi/ports.cgi @@ -30,8 +30,10 @@ use POSIX qw(strftime); use Time::Local; +our $hsty_base; require "./cgi-style.pl"; -$t_style = qq` + +our $t_style = qq` <style type="text/css"> h3 { font-size: 1.2em; border-bottom: thin solid black; } span.footer_links { font-size: small; } @@ -173,7 +175,6 @@ s/([\000-\032\;\/\?\:\@\&\=\%\'\"\`\<\>\177-\377 ])/sprintf('%%%02x',ord($1))/eg $_; } -sub warn { print "$_[0]" } sub env { defined( $ENV{ $_[0] } ) ? $ENV{ $_[0] } : undef; } sub exit { exit 0 } @@ -256,7 +257,7 @@ sub readcoll { # basic function for HTML output sub out { local ($line) = @_; - local ( + my ( $version, $path, $local, $comment, $descfile, $email, $sections, $bdepends, $rdepends, @rest ) = split( /\|/, $line );home | help
Want to link to this message? Use this
URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?696dfe52.24bb8.5a43561f>