Diff for /loncom/lonnet/perl/lonnet.pm between versions 1.105 and 1.108

version 1.105, 2001/03/15 13:40:20 version 1.108, 2001/03/19 16:46:24
Line 3 Line 3
 #  #
 # Functions for use by content handlers:  # Functions for use by content handlers:
 #  #
   # metadata_query(sql-query-string) : returns file handle of where sql
   #                                    results will be stored for query
 # plaintext(short)   : plain text explanation of short term  # plaintext(short)   : plain text explanation of short term
 # fileembstyle(ext)  : embed style in page for file extension  # fileembstyle(ext)  : embed style in page for file extension
 # filedescription(ext) : descriptor text for file extension  # filedescription(ext) : descriptor text for file extension
Line 1187  sub definerole { Line 1189  sub definerole {
   
 sub metadata_query {  sub metadata_query {
     my ($query)=@_;      my ($query)=@_;
     my $reply=&metadata_query("querysend:$query",'msul3');      my $reply=&reply("querysend:".&escape($query),'msul3');
 }  }
   
 # ------------------------------------------------------------------ Plain Text  # ------------------------------------------------------------------ Plain Text

Removed from v.1.105  
changed lines
  Added in v.1.108


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