Return to lond CVS log | Up to [LON-CAPA] / loncom |
version 1.188, 2004/04/29 10:24:40 | version 1.189, 2004/05/07 17:51:58 |
---|---|
Line 2623 sub make_new_child { | Line 2623 sub make_new_child { |
$qresult.=$key.'='.$descr.'&'; | $qresult.=$key.'='.$descr.'&'; |
} else { | } else { |
my $unescapeVal = &unescape($descr); | my $unescapeVal = &unescape($descr); |
if (eval('$unescapeVal=~/$description/i')) { | if (eval('$unescapeVal=~/\Q$description\E/i')) { |
$qresult.="$key=$descr&"; | $qresult.="$key=$descr&"; |
} | } |
} | } |