[Pgp-tools-commit] r144 - trunk/gpglist

[Peter Palfrader]

Author: weasel
Date: 2005-07-25 23:28:47 +0000 (Mon, 25 Jul 2005)
New Revision: 144

Modified:
   trunk/gpglist/gpglist
Log:
Give Usage when called with no arguments

Modified: trunk/gpglist/gpglist
===================================================================
--- trunk/gpglist/gpglist	2005-07-25 23:27:32 UTC (rev 143)
+++ trunk/gpglist/gpglist	2005-07-25 23:28:47 UTC (rev 144)
@@ -32,10 +32,11 @@
 
 use strict;
 use warnings;
+use English;
 
 my $key=shift @ARGV;
-if ( $key eq "" ) {
-	die
+unless (defined $key) {
+	die "Usage: $PROGRAM_NAME <keyid>\n";
 }
 
 open SIGS, "gpg --fixed-list-mode --with-colons --list-sigs $key 2>/dev/null |"