diff options
Diffstat (limited to 'fripost-adduser')
-rwxr-xr-x | fripost-adduser | 23 |
1 files changed, 11 insertions, 12 deletions
diff --git a/fripost-adduser b/fripost-adduser index f509e49..a785f07 100755 --- a/fripost-adduser +++ b/fripost-adduser @@ -82,8 +82,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<admin_email> @@ -133,16 +132,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 dsay { say STDERR @_ if $conf->{debug}; } |