/[local]/search/filters/default.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /search/filters/default.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by dpavlin, Thu Oct 24 18:25:22 2002 UTC revision 1.7 by dpavlin, Sat Oct 26 20:45:16 2002 UTC
# Line 142  sub DocumentFilter { Line 142  sub DocumentFilter {
142    
143                  sub html_enc {                  sub html_enc {
144                          my $tmp = $_[0];                          my $tmp = $_[0];
145                          $tmp =~ s/&/∧/g;                          $tmp =~ s/&/&/g;
146                          $tmp =~ s/</&lt;/g;                          $tmp =~ s/</&lt;/g;
147                          $tmp =~ s/>/&gt;/g;                          $tmp =~ s/>/&gt;/g;
148                          # fix some tags                          # fix some tags
# Line 156  sub DocumentFilter { Line 156  sub DocumentFilter {
156                          if (length $alt > $default::max_display_url_len ) {                          if (length $alt > $default::max_display_url_len ) {
157                                  $alt = substr($alt,0,$default::max_display_url_len)."...";                                  $alt = substr($alt,0,$default::max_display_url_len)."...";
158                          }                          }
159                          $DocumentFinal .= "<A HREF=\"$Document{$FieldTag}\" TARGET=\"BlankWindow\">$alt</A>";                          my $url = $Document{$FieldTag};
160                            $url =~ s/"/%22/g;      # save " from URLs
161                            $DocumentFinal .= "<A HREF=\"$url\" TARGET=\"BlankWindow\">$alt</A>";
162    
163                  } else {                  } else {
164                          $DocumentFinal .= html_enc($Document{$FieldTag});                          $DocumentFinal .= html_enc($Document{$FieldTag});
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.26