Changeset 13261

Timestamp:

May 4, 2007, 3:06:27 PM (19 years ago)

Author:

eugene

Message:

need to check for ENV HOME before using

File:

• trunk/Nebulous/lib/Nebulous/Client/Log.pm (modified) (2 diffs)

trunk/Nebulous/lib/Nebulous/Client/Log.pm

@@ -1 +1 @@
 # Copyright (c) 2004  Joshua Hoblitt
 #
-# $Id: Log.pm,v 1.5 2007-05-05 00:39:59 jhoblitt Exp $
+# $Id: Log.pm,v 1.6 2007-05-05 01:06:27 eugene Exp $
 
 package Nebulous::Client::Log;
@@ -14 +14 @@
 
 sub init {
-    my $log_path = $ENV{HOME} or File::Spec->tmpdir();
+    my $log_path;
+    if (defined $ENV{HOME}) {
+        $log_path = $ENV{HOME};
+    } else {
+        $log_path = File::Spec->tmpdir();
+    }
+    # my $log_path = $ENV{HOME} or File::Spec->tmpdir();
 
     my $conf = <<END;