--- loncom/lond 2004/02/24 16:51:40 1.178.2.4 +++ loncom/lond 2004/02/24 16:52:16 1.178.2.5 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.178.2.4 2004/02/24 16:51:40 albertel Exp $ +# $Id: lond,v 1.178.2.5 2004/02/24 16:52:16 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -53,7 +53,7 @@ my $DEBUG = 1; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.178.2.4 $'; #' stupid emacs +my $VERSION='$Revision: 1.178.2.5 $'; #' stupid emacs my $remoteVERSION; my $currenthostid; my $currentdomainid; @@ -1870,7 +1870,6 @@ sub DumpWithRegexp { my %hash; if (tie(%hash,'GDBM_File',"$proname/$namespace.db", &GDBM_READER(),0640)) { - study($regexp); while (my ($key,$value) = each(%hash)) { if ($regexp eq '.') { $qresult.=$key.'='.$value.'&';