OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Ralf S. Engelschall
Root: /e/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-web Date: 08-Jan-2004 16:29:40
Branch: HEAD Handle: 2004010815294000
Modified files:
openpkg-web/security page.pl
Log:
always render all available SAs, but tag unreleased/unsigned ones with
DRAFT header
Summary:
Revision Changes Path
1.36 +7 -2 openpkg-web/security/page.pl
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-web/security/page.pl
============================================================================
$ cvs diff -u -r1.35 -r1.36 page.pl
--- openpkg-web/security/page.pl 17 Dec 2003 11:58:48 -0000 1.35
+++ openpkg-web/security/page.pl 8 Jan 2004 15:29:40 -0000 1.36
@@ -8,12 +8,11 @@
my @SA = glob("OpenPKG-SA-*.txt");
-my $this_year = "2003";
+my $this_year = "2004";
my $sidebar = '<u>Security Advisories:</u><p>';
foreach my $sa (reverse sort @SA) {
my ($base, $name, $year) = ($sa =~ m|^(OpenPKG-SA-((\d+)\..+))\.txt$|);
next if ($name =~ m|^0000|);
- next if ($name =~ m|^2003\.05[4-9]|);
if ($this_year ne $year) {
$sidebar .= "<br>\n";
$this_year = $year;
@@ -55,7 +54,13 @@
$head =~ s|[EMAIL PROTECTED]@|$sa|sg;
$head =~ s|[EMAIL PROTECTED]@|$sidebar|s;
+ my $hint = '';
+ if ($txt !~ m|^-----BEGIN PGP SIGNED MESSAGE-----|) {
+ $hint = "<center><font color=\"#cc3333\" size=+4><b>*** DRAFT
***</b></font></center>\n";
+ }
+
my $out = $head .
+ $hint .
"<pre>\n" . $txt . "</pre>\n" .
$foot;
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [EMAIL PROTECTED]
