--- loncom/lond 2003/07/14 13:43:42 1.132 +++ loncom/lond 2003/08/11 21:15:26 1.133 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.132 2003/07/14 13:43:42 matthew Exp $ +# $Id: lond,v 1.133 2003/08/11 21:15:26 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -73,7 +73,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.132 $'; #' stupid emacs +my $VERSION='$Revision: 1.133 $'; #' stupid emacs my $remoteVERSION; my $currenthostid; my $currentdomainid; @@ -1556,7 +1556,7 @@ sub make_new_child { while (($key,$value) = each(%hash)) { my ($descr,$lasttime)=split(/\:/,$value); if ($lasttime<$since) { next; } - if ($regexp eq '.') { + if ($description eq '.') { $qresult.=$key.'='.$descr.'&'; } else { my $unescapeVal = &unescape($descr);