tabs -> spaces for consistency
This commit is contained in:
parent
4136e1b262
commit
5d39d5b7eb
@ -13,9 +13,9 @@ use vars qw/ %opt /;
|
|||||||
|
|
||||||
# Command line options processing
|
# Command line options processing
|
||||||
sub init() {
|
sub init() {
|
||||||
my $opts = 'hrdp';
|
my $opts = 'hrdp';
|
||||||
getopts( "$opts", \%opt ) or usage();
|
getopts( "$opts", \%opt ) or usage();
|
||||||
usage() if $opt{h} or !($opt{r} or $opt{d} or $opt{p});
|
usage() if $opt{h} or !($opt{r} or $opt{d} or $opt{p});
|
||||||
}
|
}
|
||||||
|
|
||||||
sub usage() {
|
sub usage() {
|
||||||
@ -103,4 +103,4 @@ if (defined $pubkey) {
|
|||||||
print output_hex($pubkey) if $opt{d};
|
print output_hex($pubkey) if $opt{d};
|
||||||
} else {
|
} else {
|
||||||
usage();
|
usage();
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user