--- prt-utils-1.1.4/portspage 2020-10-15 05:16:54.000000000 -0400 +++ prt-utils-1.1.4d/portspage 2021-06-26 09:48:55.002676259 -0400 @@ -1,16 +1,18 @@ #!/usr/bin/perl -w -our $version = "1.0.4"; +our $version = "1.0.5"; ######################################################################## # -# portspage (http://www.karsikkopuu.net/crux/scripts/) +# portspage # ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ # This is a script for generating CRUX port listings. # Distributed under the terms of the GPL license. -# Report bugs and suggestions to . +# Report bugs and suggestions to jmcquah at disroot dot org. # # Changelog: +# 1.0.5 +# - Added a table row containing the signify public key # 1.0.4 # - Added --date-from-pkgfile (patch from Mikhail Kolesnik) # 1.0.3 @@ -23,6 +25,7 @@ ######################################################################## use strict; +use Cwd qw(cwd getcwd); our %options = ( @@ -229,7 +232,28 @@ close(FILE); } + + + print " \n"; + my $CWD = getcwd; + my @repopath = split /\//, $CWD; + my $repo = $repopath[$#repopath]; + my $pubkey = "/etc/ports/".$repo.".pub"; + if (-e $pubkey) { + open(KH, $pubkey) or die "Couldn't read from public key!"; + while (my $line = ) { + chomp $line; + if ($line =~ "untrusted comment") { + } + else { + print " \n"; + } + } + close(KH); + } print " "; if ($options{timestamp_accuracy} > 0) { @@ -293,7 +317,7 @@ close(FILE); } - print "

Generated by portspage $version on " . isotime() . ".

\n"; + print "

Generated by portspage $version on " . isotime() . ".

\n"; print <
\n"; + print " Signify public key: $line\n"; + print "
PortVersionDescription