--- loncom/lond 2004/05/04 10:09:38 1.178.2.22 +++ loncom/lond 2004/05/07 17:57:18 1.178.2.23 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.178.2.22 2004/05/04 10:09:38 foxr Exp $ +# $Id: lond,v 1.178.2.23 2004/05/07 17:57:18 www 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.22 $'; #' stupid emacs +my $VERSION='$Revision: 1.178.2.23 $'; #' stupid emacs my $remoteVERSION; my $currenthostid; my $currentdomainid; @@ -2252,7 +2252,7 @@ sub DumpCourseIdHandler { } else { my $unescapeVal = &unescape($descr); logthis("Matching with $unescapeVal"); - if (eval('$unescapeVal=~/$description/i')) { + if (eval('$unescapeVal=~/\Q$description\E/i')) { logthis("Adding on match"); $qresult.="$key=$descr&"; }