--- loncom/Attic/lchtmldir 2004/08/05 20:33:50 1.6
+++ loncom/Attic/lchtmldir 2004/08/05 20:35:55 1.7
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
# The Learning Online Network with CAPA
#
@@ -238,7 +238,6 @@ exit 0;
sub EnableRoot {
if ($wwwid==$>) {
- print ("EnableRoot $< $>\n");
($<,$>)=($>,$<);
($(,$))=($),$();
}