--- loncom/loncnew	2006/07/19 19:56:26	1.75
+++ loncom/loncnew	2006/08/25 21:12:19	1.76
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # lonc maintains the connections to remote computers
 #
-# $Id: loncnew,v 1.75 2006/07/19 19:56:26 albertel Exp $
+# $Id: loncnew,v 1.76 2006/08/25 21:12:19 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -198,7 +198,7 @@ sub Log {
     my $now   = time;
     my $local = localtime($now);
     my $finalformat = "$local ($$) [$RemoteHost] [$Status] ";
-    my $finalformat = $finalformat.$format."\n";
+    $finalformat = $finalformat.$format."\n";
 
     # open the file and put the result.
 
@@ -1731,7 +1731,7 @@ sub ChildProcess {
 	      desc => 'Lonc Listener Unix Socket',
 	      fd   => $socket);
     
-    $Event::Debuglevel = $DebugLevel;
+    $Event::DebugLevel = $DebugLevel;
     
     Debug(9, "Making initial lond connection for ".$RemoteHost);