From 5827d41f6f7ca96eda7ffa91a375217bda0bb4dd Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Sun, 29 Mar 2015 14:52:36 +0200 Subject: Use -h not -? as short hand for --help --- cli/icevault | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'cli/icevault') diff --git a/cli/icevault b/cli/icevault index 1f662bf..d9a6792 100755 --- a/cli/icevault +++ b/cli/icevault @@ -657,7 +657,7 @@ my @USAGE = ( rm => "[-f, --force] [-r, --recursive] scheme://[hostname/[identity]] ...", ); -if ($ARGV[0] eq '--help' or $ARGV[0] eq '-?') { +if ($ARGV[0] eq '--help' or $ARGV[0] eq '-h') { my $default_cmd = shift @USAGE; my $default_usage = shift @USAGE; print "Usage: $NAME [$default_cmd] $default_usage\n"; @@ -698,7 +698,7 @@ sub usage(@) { sub getopts(%) { my @opts = @_; my %opts = @opts; - usage(@opts) unless GetOptions(\%CONFIG, qw/debug help|?/, keys %opts) and !$CONFIG{help}; + usage(@opts) unless GetOptions(\%CONFIG, qw/debug help|h/, keys %opts) and !$CONFIG{help}; loadConfig(); } @@ -1198,5 +1198,5 @@ elsif ($COMMAND eq 'rm') { else { print STDERR "Usage: $NAME [COMMAND] [OPTION ...] [ARG ...]\n"; - error "Unknown command C<%s>. Try C<%s> for more information.", $COMMAND, "$NAME --help"; + error "Unknown command C<%s>. Try C<%s> or consult the manpage for more information.", $COMMAND, "$NAME --help"; } -- cgit v1.2.3