--- loncom/lonnet/perl/lonnet.pm	2001/10/05 17:54:36	1.161
+++ loncom/lonnet/perl/lonnet.pm	2001/10/06 20:57:45	1.162
@@ -153,9 +153,8 @@ sub logthis {
     my $execdir=$perlvar{'lonDaemons'};
     my $now=time;
     my $local=localtime($now);
-    my $fh;
-    $fh=Apache::File->new(">>$execdir/logs/lonnet.log") and
-	print $fh "$local ($$): $message\n";
+    my $fh=Apache::File->new(">>$execdir/logs/lonnet.log");
+    print $fh "$local ($$): $message\n";
     return 1;
 }
 
@@ -164,9 +163,8 @@ sub logperm {
     my $execdir=$perlvar{'lonDaemons'};
     my $now=time;
     my $local=localtime($now);
-    my $fh;
-    $fh=Apache::File->new(">>$execdir/logs/lonnet.perm.log") and
-	print $fh "$now:$message:$local\n";
+    my $fh=Apache::File->new(">>$execdir/logs/lonnet.perm.log");
+    print $fh "$now:$message:$local\n";
     return 1;
 }