Remove Log (just pipe it) & Be Quiet About config.pl

2 files changed, 1 insertions, 2 deletions

diff --git a/perl/cgi.pl b/perl/cgi.pl
index 3cbed42..d19c915 100755
--- a/perl/cgi.pl
+++ b/perl/cgi.pl
@@ -22,7 +22,7 @@ use Git::Repository;
 
 use lib qw(. ..);
 BEGIN { require 'config.default.pl'; }
-BEGIN { require 'config.pl'; }
+BEGIN { require 'config.pl' if -f 'config.pl'; }
 
 sub info {
     warn join(' ', @_);
diff --git a/perl/fcgi.pl b/perl/fcgi.pl
index 0f3dff8..b3e6d9e 100755
--- a/perl/fcgi.pl
+++ b/perl/fcgi.pl
@@ -11,7 +11,6 @@ BEGIN { require 'cgi.pl'; }
 
 while (1) {
     try {
-        open STDERR, '>', LOG_FILE or die LOG_FILE . ": $!";
         my $request = FCGI::Request( \*STDIN, \*STDOUT, \*STDERR, \%ENV, BARE_REQUEST ? 0 : FCGI::OpenSocket(SOCKET_FILE, SOCKET_MAX_CONNECTIONS));
         while($request->Accept() >= 0) {
             master();