Various ud-fingerserv fixes

[mirror/userdir-ldap.git] / ud-fingerserv

diff --git a/ud-fingerserv b/ud-fingerserv
index 1c977d8..ecabadd 100755 (executable)
--- a/ud-fingerserv
+++ b/ud-fingerserv
@@ -43,9 +43,9 @@ $SIG{CHLD} = \&Reaper;
 &help if (defined($opts{h}));
 
 my $logfh;
-unless ($opt{i} || $opt{f}) {
-  die "Need logfile unless running foreground\n" unless (defined($opt{l}));
-  open ($logfh, $opt{l}) or die "Can't open logfile: $!\n";
+unless ($opts{i} || $opts{f}) {
+  die "Need logfile unless running foreground\n" unless (defined($opts{l}));
+  open ($logfh, $opts{l}) or die "Can't open logfile: $!\n";
 } else {
   $logfh = \*STDOUT;
 }
@@ -76,7 +76,7 @@ if (!$use_inetd) {
                                     Listen => SOMAXCONN,
                                     Reuse => 1);
 
-  mydie "Cannot listen on finger port" unless $server;
+  mydie("Cannot listen on finger port") unless $server;
   &log("[Server listening for connections]");
 
   my ($pid, $client, $hostinfo);
@@ -84,7 +84,7 @@ if (!$use_inetd) {
   while ($client = $server->accept()) {
     &log("Forking to handle client request") if (defined($opts{v}));
     next if $pid = fork; # parent
-    mydie "fork: $!" unless defined $pid;
+    mydie("fork: $!") unless defined $pid;
   
     # child
     $client->autoflush(1);