git-daemon: suppress warnings

[userv-utils] / git-daemon / git-daemon.pl

diff --git a/git-daemon/git-daemon.pl b/git-daemon/git-daemon.pl
index aabef66..5458c08 100755 (executable)
--- a/git-daemon/git-daemon.pl
+++ b/git-daemon/git-daemon.pl
@@ -71,8 +71,10 @@ my $user = $vhost_user_from_tilde{$host} ? $tilde : $vhost_default_user{$host};
 fail "no user configuration for $url" unless defined $user;
 syslog 'info', "$peer $user $url";
 
-my @opts = ("-DCLIENT=$addr", "-DHOST=$host", "-DREPO=$repo");
+my @opts = ("-DHOST=$host", "-DREPO=$repo");
 push @opts, "-DTILDE=$tilde" if defined $tilde;
+push @opts, "-DCLIENT=$addr" if defined $addr;
+no warnings; # suppress errors to stderr
 exec 'userv', @opts, $user, 'git-upload-pack'
     or fail "exec userv: $!";