Index: /trunk/Nebulous/lib/Nebulous/Client/Log.pm
===================================================================
--- /trunk/Nebulous/lib/Nebulous/Client/Log.pm	(revision 13260)
+++ /trunk/Nebulous/lib/Nebulous/Client/Log.pm	(revision 13261)
@@ -1,5 +1,5 @@
 # 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,5 +14,11 @@
 
 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;