Imported Upstream version 2.3

[pkg/t-prot.git] / t-prot

diff --git a/t-prot b/t-prot
index ff9d8115c7415d857a3ef25d8c8b8894ff259e75..20f3119f5b4e607e4af69bb62321b66258aaac26 100755 (executable)
--- a/t-prot
+++ b/t-prot
@@ -1,13 +1,13 @@
 #!/usr/bin/perl -w
-# $Id: t-prot,v 1.248 2006/11/30 14:06:27 jochen Exp $
+# $Id: t-prot,v 1.250 2006/12/19 13:13:57 jochen Exp $
 
 require 5.006;
 use strict;
 use Fcntl qw(O_EXCL O_WRONLY O_CREAT);
 use Getopt::Mixed qw(nextOption);
-use constant VER            => '2.2';
+use constant VER            => '2.3';
 use constant REV            => '';
-use constant REL            => q$Revision: 1.248 $=~m/(\d+(?:\.\d+)+)/;
+use constant REL            => q$Revision: 1.250 $=~m/(\d+(?:\.\d+)+)/;
 # MTA expecting mail on STDIN
 # (you might have to adjust this if using a different MTA)
 use constant SENDMAIL       => '/usr/sbin/sendmail -oi';
@@ -86,8 +86,8 @@ $gpg_bug                = '... this is a bug (';
 # help(): print help text and exit with appropriate exit code
 sub help {
     print "Usage: $0 [options] 
-  -a              remove ad footers; requires -A
   -A=DIRECTORY    ad footer directory, treat ad footers as signature
+  -a              remove ad footers; requires -A
   --bigq[=n[,x]]  remove all but x lines of quotes with more than n
                   lines; default is n=30 and x=10
   --body          input has no headers; does not work with --pgp-short;