--- loncom/interface/lonsearchcat.pm 2001/03/27 02:48:02 1.79
+++ loncom/interface/lonsearchcat.pm 2001/03/27 12:49:18 1.81
@@ -683,12 +683,14 @@ sub output_results {
$customshow=~s/[^\w\s]//g;
my @fields=map {"$_:"}
split(/\s+/,$customshow);
- $extrashow="
\n";
+ if ($customshow) {
+ $extrashow="\n";
+ }
}
my $customdata='';
foreach my $result (@results) {
$result=~/(\&custom.*)$/; # grab all custom metadata
- $custom=$1;
+ $customdata=$1;
$result=~s/\&custom.*$//; # remove custom metadata
}
foreach my $result (@results) {
@@ -776,7 +778,7 @@ SCRIPT
Search Catalog