aboutsummaryrefslogtreecommitdiffstats
path: root/fripost-newdomain
diff options
context:
space:
mode:
Diffstat (limited to 'fripost-newdomain')
-rwxr-xr-xfripost-newdomain23
1 files changed, 11 insertions, 12 deletions
diff --git a/fripost-newdomain b/fripost-newdomain
index 0e1cb37..3c877e5 100755
--- a/fripost-newdomain
+++ b/fripost-newdomain
@@ -83,8 +83,7 @@ Valid keys include:
=item I<server_host>
-The LDAP URI to connect to. It has to be set, either in the
-configuration file, or using the command line option B<--server_host>.
+The LDAP URI to connect to. Defaults to C<ldap://127.0.0.1:389>.
=item I<bind_dn>
@@ -125,16 +124,16 @@ use YAML::Syck;
our $conf = LoadFile( catfile ($HOME, '.fripost.yml') );
GetOptions(
- 'server_host' => \$conf->{server_host},
- 'base_dn=s' => \$conf->{base_dn},
- 'bind_dn=s' => \$conf->{bind_dn},
- 'bind_pw=s' => \$conf->{bind_pw},
- 'pretend' => \$conf->{pretend},
- 'owner=s' => \$conf->{owner},
- 'debug' => \$conf->{debug},
- 'v|verbose' => \$conf->{verbose},
- 'man' => sub { pod2usage(-exitstatus => 0,
- -verbose => 2) }
+ 'server_host=s' => \$conf->{server_host},
+ 'base_dn=s' => \$conf->{base_dn},
+ 'bind_dn=s' => \$conf->{bind_dn},
+ 'bind_pw=s' => \$conf->{bind_pw},
+ 'pretend' => \$conf->{pretend},
+ 'owner=s' => \$conf->{owner},
+ 'debug' => \$conf->{debug},
+ 'v|verbose' => \$conf->{verbose},
+ 'man' => sub { pod2usage(-exitstatus => 0,
+ -verbose => 2) }
) or pod2usage(2);
sub vsay { say STDERR @_ if $conf->{verbose} || $conf->{debug}; }