X-Git-Url: http://git.sthu.org/?a=blobdiff_plain;f=caff%2Fpgp-clean;h=7514e71f396f8b9555ccff511231fa57955424d0;hb=03fe24eba2e5a9d1d829305aada0489cdf88f842;hp=71022c51a32d03ae7c4754d906d4aa7d5aa61bf6;hpb=8f1e7567d62681751931472492f74e8f48d37f3c;p=pgp-tools.git

diff --git a/caff/pgp-clean b/caff/pgp-clean
index 71022c5..7514e71 100755
--- 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;
 };