--- search/filters/default.pl 2002/06/13 17:25:53 1.1
+++ search/filters/default.pl 2002/06/14 18:10:27 1.2
@@ -256,6 +256,10 @@
# Print the row start
$DocumentFinal .= "
$default::FieldNames{$FieldTag}: | ";
+ $Document{$FieldTag} =~ s/&/∧/g;
+ $Document{$FieldTag} =~ s/</g;
+ $Document{$FieldTag} =~ s/>/>/g;
+
# Print the field data, marking up if needed
if ( $FieldTag eq "A" || $FieldTag eq "E" ) {
$CommaFlag = 0;
|