aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xfripost-searchalias17
1 files changed, 9 insertions, 8 deletions
diff --git a/fripost-searchalias b/fripost-searchalias
index 65f1d4b..a70b900 100755
--- a/fripost-searchalias
+++ b/fripost-searchalias
@@ -11,7 +11,9 @@ fripost-searchalias - List matching aliases
=head1 SYNOPSIS
-B<fripost-searchalias> [B<--debug>] [B<--from>] [B<--goto>] [I<goto/from>]
+B<fripost-searchalias> [B<--debug>] [B<-f|--from>] [B<-g|--goto>] [address]
+
+B<fripost-searchalias> [B<--man>]
=head1 DESCRIPTION
@@ -48,16 +50,16 @@ The default value is read from the configuration file, see B<CONFIGURATION>.
The root DN for everything done by B<fripost-searchalias>.
The default value is read from the configuration file, see B<CONFIGURATION>.
-=item B<--debug>
+=item B<-d>, B<--debug>
Debug mode.
-=item B<--from>
+=item B<-f>, B<--from>
Match on 'from' addresses.
The default is to match both the 'from' and 'goto' address.
-=item B<--goto>
+=item B<-g>, B<--goto>
Match on 'goto' addresses.
The default is to match both the 'from' and 'goto' address.
@@ -114,10 +116,9 @@ GetOptions(
'base_dn=s' => \$conf->{base_dn},
'bind_dn=s' => \$conf->{bind_dn},
'bind_pw=s' => \$conf->{bind_pw},
- 'pretend' => \$conf->{pretend},
- 'debug' => \$conf->{debug},
- 'from' => \$conf->{from},
- 'goto' => \$conf->{goto},
+ 'debug|d' => \$conf->{debug},
+ 'from|f' => \$conf->{from},
+ 'goto|g' => \$conf->{goto},
'man' => sub { pod2usage(-exitstatus => 0,
-verbose => 2) }
) or pod2usage(2);