Changeset 14233
- Timestamp:
- 2007-07-09T11:57:10+12:00 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/HTMLPlug.pm
r14089 r14233 1187 1187 1188 1188 foreach my $field (split /,/, $self->{'metadata_fields'}) { 1189 $field =~ s/^\s+//; # remove leading whitespace 1190 $field =~ s/\s+$//; # remove trailing whitespace 1191 1189 1192 # support tag<tagname> 1190 1193 if ($field =~ /^(.*?)<(.*?)>$/) {
Note:
See TracChangeset
for help on using the changeset viewer.