Minor fix for pesky v3k keys

[pgp-tools.git] / caff / pgp-clean

diff --git a/caff/pgp-clean b/caff/pgp-clean
index 71022c51a32d03ae7c4754d906d4aa7d5aa61bf6..7514e71f396f8b9555ccff511231fa57955424d0 100755 (executable)
--- a/caff/pgp-clean
+++ b/caff/pgp-clean
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 
-# caff  --  CA - Fire and Forget
-# $Id: caff 37 2005-02-28 23:20:15Z weasel $
+# pgp-clean  --  remove all non-self signatures from key
+# $Id$
 #
 # Copyright (c) 2004, 2005 Peter Palfrader <peter@palfrader.org>
 #
@@ -89,7 +89,7 @@ use Fcntl;
 use IO::Select;
 use GnuPG::Interface;
 
-my $REVISION = '$Rev: 37 $';
+my $REVISION = '$Rev$';
 my ($REVISION_NUMER) = $REVISION =~ /(\d+)/;
 my $VERSION = "0.0.0.$REVISION_NUMER";
 
@@ -247,7 +247,7 @@ my $KEYEDIT_DELSUBKEY_PROMPT = '^\[GNUPG:\] GET_BOOL keyedit.remove.subkey';
 
 
 sub usage() {
-       print STDERR "caff $VERSION - (c) 2004, 2005 Peter Palfrader\n";
+       print STDERR "pgp-clean $VERSION - (c) 2004, 2005 Peter Palfrader\n";
        print STDERR "Usage: $PROGRAM_NAME <keyid> [<keyid> ...]\n";
        exit 1;
 };