Unauthenticate binds; LDAP server defaults to ldap://127.0.0.1:389.

1 files changed, 11 insertions, 12 deletions

diff --git a/fripost-passwd b/fripost-passwd
index d6abe3f..f508e9d 100755
--- a/fripost-passwd
+++ b/fripost-passwd
@@ -41,8 +41,7 @@ only a hash, for example.
 
 =item B<--server_host=>I<host>
 
-The LDAP URI to connect to.
-The default value is read from the configuration file, see B<CONFIGURATION>.
+The LDAP URI to connect to. Defaults to C<ldap://127.0.0.1:389>.
 
 =item B<--bind_dn=>I<binddn>
 
@@ -118,16 +117,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},
-    'debug'       => \$conf->{debug},
-    'v|verbose'   => \$conf->{verbose},
-    'password=s'  => \$conf->{password},
-    '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},
+    'debug'         => \$conf->{debug},
+    'v|verbose'     => \$conf->{verbose},
+    'password=s'    => \$conf->{password},
+    'man'           => sub { pod2usage(-exitstatus => 0,
+                                       -verbose => 2) }
 ) or pod2usage(2);
 
 sub vsay { say STDERR @_ if $conf->{verbose} || $conf->{debug}; }