diff options
author | jrayhawk+piny.be@omgwallhack.org <jrayhawk+piny.be@omgwallhack.org> | 2012-08-30 23:43:11 -0700 |
---|---|---|
committer | jrayhawk+piny.be@omgwallhack.org <jrayhawk+piny.be@omgwallhack.org> | 2012-08-30 23:43:11 -0700 |
commit | b54923473582b86df9a043de584b7eefd0f8c640 (patch) | |
tree | 80a334222ede97eddcb0b630f8ed6638c8a52639 | |
parent | 71c88da202543ce225ddf05713cf2f5c170fb04e (diff) | |
download | piny-code-b54923473582b86df9a043de584b7eefd0f8c640.tar.gz piny-code-b54923473582b86df9a043de584b7eefd0f8c640.zip |
pinyconfig: explicitly declare short opts
Getopt::Long does not appear to auto_abbrev properly ;\
-rwxr-xr-x | pinyadmin/sbin/pinyconfig | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/pinyadmin/sbin/pinyconfig b/pinyadmin/sbin/pinyconfig index 67c6b53..2e70d02 100755 --- a/pinyadmin/sbin/pinyconfig +++ b/pinyadmin/sbin/pinyconfig @@ -10,9 +10,9 @@ use Getopt::Long qw(:config bundling auto_abbrev); my ( $fast, $user, $help ) = ( 0, 0, 0 ); GetOptions ( - "fast" => \$fast, - "user" => \$user, - "help" => \$help + "fast|f" => \$fast, + "user|u" => \$user, + "help|h" => \$help ); my ( $reponame, $attr, $value ) = @ARGV; |