Changeset 17110 for gsdl/trunk/perllib/mgbuildproc.pm
- Timestamp:
- 2008-08-30T07:35:20+12:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/mgbuildproc.pm
r15738 r17110 47 47 sub find_paragraphs { 48 48 $_[1] =~ s/(<p\b)/\cC$1/gi; 49 }50 51 sub filter_text {52 # $self->filter_text ($field, $new_text);53 # don't want to do anything for this version, however,54 # in a particular collection you might want to override55 # this method to post-process certain fields depending on56 # the field, or whether we are outputting it for indexing57 49 } 58 50 … … 131 123 132 124 # filter the text 133 $ self->filter_text ($field, $new_text);125 $new_text = $self->filter_text ($field, $new_text); 134 126 135 127 $text .= "$new_text\cC";
Note:
See TracChangeset
for help on using the changeset viewer.