--- loncom/lonnet/perl/lonnet.pm 2001/03/02 21:43:54 1.104 +++ loncom/lonnet/perl/lonnet.pm 2001/03/19 16:46:24 1.108 @@ -3,6 +3,8 @@ # # 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 # fileembstyle(ext) : embed style in page for file extension # filedescription(ext) : descriptor text for file extension @@ -88,6 +90,7 @@ # 09/01,10/01,11/01 Gerd Kortemeyer # 02/27/01 Scott Harrison # 3/2 Gerd Kortemeyer +# 3/15 Scott Harrison package Apache::lonnet; @@ -1182,6 +1185,13 @@ sub definerole { } } +# ---------------- Make a metadata query against the network of library servers + +sub metadata_query { + my ($query)=@_; + my $reply=&reply("querysend:".&escape($query),'msul3'); +} + # ------------------------------------------------------------------ Plain Text sub plaintext {