Logging

2 files changed, 3 insertions, 2 deletions

diff --git a/config.pl.example b/config.pl.example
index fd39608..c6becdf 100644
--- a/config.pl.example
+++ b/config.pl.example
@@ -1,4 +1,5 @@
 # always assume anything to do with files is from project root
+use constant LOG_FILE => '/tmp/gorillanest.log';
 use constant GIT_ROOT => 'git'; # directory containing all browsable $users/$repositories
 use constant DB_FILE => 'gorillanest.sqlite3'; # sqlite3 database file location
 use constant TEMPLATE_ROOT => 'template'; # template directory
diff --git a/gorillanest.pl b/gorillanest.pl
index 53d3a9d..49a6e4e 100755
--- a/gorillanest.pl
+++ b/gorillanest.pl
@@ -22,7 +22,7 @@ sub info {
 # significant dirs only
 sub GN::directories {
     my $root = $_[0];
-    opendir my $dir, $root or die "Cannot open directory: $!";
+    opendir my $dir, $root or die "$root: $!";
     my @directories;
     my %drop = (
         '.'  => 0,
@@ -62,7 +62,7 @@ sub GN::repository { # /$username/$repository
 }
 
 sub GN::main {
-    open STDERR, '>', '/tmp/gorillanest.log' or die "You Will Never Ever See This Message Hopefully: $!";
+    open STDERR, '>', LOG_FILE or die LOG_FILE . ": $!";
     my $sock = FCGI::OpenSocket('/tmp/gorillanest.socket', 100);
     try {
         my $root = GIT_ROOT;