Diff for /loncom/lonnet/perl/lonnet.pm between versions 1.106 and 1.107

version 1.106, 2001/03/15 14:04:32 version 1.107, 2001/03/15 20:56:14
Line 1187  sub definerole { Line 1187  sub definerole {
   
 sub metadata_query {  sub metadata_query {
     my ($query)=@_;      my ($query)=@_;
     my $reply=&reply("querysend:$query",'msul3');      my $reply=&reply("querysend:".&escape($query),'msul3');
 }  }
   
 # ------------------------------------------------------------------ Plain Text  # ------------------------------------------------------------------ Plain Text

Removed from v.1.106  
changed lines
  Added in v.1.107


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>