Diff for /loncom/lonnet/perl/lonnet.pm between versions 1.110 and 1.111

version 1.110, 2001/03/20 21:33:37 version 1.111, 2001/03/22 13:29:05
Line 1242  sub definerole { Line 1242  sub definerole {
   
 sub metadata_query {  sub metadata_query {
     my ($query)=@_;      my ($query)=@_;
       # need to put in a loop here and return list
     my $reply=&reply("querysend:".&escape($query),'msul3');      my $reply=&reply("querysend:".&escape($query),'msul3');
 }  }
   

Removed from v.1.110  
changed lines
  Added in v.1.111


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