--- loncom/interface/lonsearchcat.pm 2001/03/27 02:32:44 1.78 +++ loncom/interface/lonsearchcat.pm 2001/03/27 02:48:02 1.79 @@ -685,6 +685,12 @@ sub output_results { split(/\s+/,$customshow); $extrashow="\n"; } + my $customdata=''; + foreach my $result (@results) { + $result=~/(\&custom.*)$/; # grab all custom metadata + $custom=$1; + $result=~s/\&custom.*$//; # remove custom metadata + } foreach my $result (@results) { my @fields=map {&Apache::lonnet::unescape($_)} @@ -770,6 +776,7 @@ SCRIPT

Search Catalog

+$custom $closebutton