diff options
| -rw-r--r-- | doc/CHANGES | 3 | ||||
| -rw-r--r-- | security/gpg2dot/Makefile | 4 | ||||
| -rw-r--r-- | security/gpg2dot/files/gpg2dot.pl | 10 |
3 files changed, 9 insertions, 8 deletions
diff --git a/doc/CHANGES b/doc/CHANGES index fa0c8969c54..c5cad9bf821 100644 --- a/doc/CHANGES +++ b/doc/CHANGES @@ -1,4 +1,4 @@ -$NetBSD: CHANGES,v 1.5438 2004/04/04 19:27:37 recht Exp $ +$NetBSD: CHANGES,v 1.5439 2004/04/04 22:16:58 hubertf Exp $ Changes to the packages collection and infrastructure in 2004: @@ -1773,3 +1773,4 @@ Changes to the packages collection and infrastructure in 2004: Updated icu to 2.8 [recht 2004-04-04] Added winelib-0.1 [recht 2004-04-04] Updated mono to 0.31nb1 [recht 2004-04-04] + Updated gpg2dot to 1.3 [hubertf 2004-04-04] diff --git a/security/gpg2dot/Makefile b/security/gpg2dot/Makefile index ab08142e05f..0a1839ffb53 100644 --- a/security/gpg2dot/Makefile +++ b/security/gpg2dot/Makefile @@ -1,7 +1,7 @@ -# $NetBSD: Makefile,v 1.3 2004/02/24 13:49:29 grant Exp $ +# $NetBSD: Makefile,v 1.4 2004/04/04 22:16:59 hubertf Exp $ # -DISTNAME= gpg2dot-1.2 +DISTNAME= gpg2dot-1.3 WRKSRC= ${WRKDIR} CATEGORIES= security MASTER_SITES= # empty diff --git a/security/gpg2dot/files/gpg2dot.pl b/security/gpg2dot/files/gpg2dot.pl index 174cb8581e0..213e23907f1 100644 --- a/security/gpg2dot/files/gpg2dot.pl +++ b/security/gpg2dot/files/gpg2dot.pl @@ -1,6 +1,6 @@ #!@PREFIX@/bin/perl # -# $NetBSD: gpg2dot.pl,v 1.2 2004/01/21 04:14:45 lukem Exp $ +# $NetBSD: gpg2dot.pl,v 1.3 2004/04/04 22:16:59 hubertf Exp $ # ---------------------------------------------------------------------------- # "THE BEER-WARE LICENSE" (Revision 42): @@ -67,8 +67,8 @@ foreach (@isigs) { } elsif ($skeyid eq $mykeyid) { # i trust you (one way) $color = "red"; } - push(@sigs, sprintf("\"%s\" -> \"%s\" [color=\"%s\"%s];\t// %s -> %s\n", - $skeyid, $keyid, $color, $attrs, + push(@sigs, sprintf("\"%s\" -> \"%s\"[tailURL=\"http://webware.lysator.liu.se/jc/wotsap/?top=0x%s&bottom=0x%s\",headURL=\"http://webware.lysator.liu.se/jc/wotsap/?top=0x%s&bottom=0x%s\",color=\"%s\"%s];\t// %s -> %s\n", + $skeyid, $keyid, $keyid, $skeyid, $skeyid, $keyid, $color, $attrs, $kuid{$skeyid}, $kuid{$keyid})); $signer{$skeyid} = "yes"; $signed{$keyid} = "yes"; @@ -76,8 +76,8 @@ foreach (@isigs) { foreach (keys %label) { next if (!$signer{$_} && !$signed{$_}); - push(@keys, sprintf("\"%s\" [label=\"%s\"];\n", - $_, $label{$_})); + push(@keys, sprintf("\"%s\" [URL=\"http://webware.lysator.liu.se/jc/wotsap/?top=0x%s\",label=\"%s\",shape=\"box\"];\n", + $_, $_, $label{$_})); } @sigs = uniq(sort(@sigs)); |