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 aabef66a6cb7d1692fd7a7d3f38004b8c54746b5..5458c08fcd2c77036fcf34261d900640fbbb010e 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";
 
 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, "-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: $!";
 
 exec 'userv', @opts, $user, 'git-upload-pack'
     or fail "exec userv: $!";