Changeset 14233 for gsdl

Timestamp:

2007-07-09T11:57:10+12:00 (17 years ago)

Author:

xiao

Message:

in sub extract_metadata, when reading the value of the argument metadata_fields (may be a list of comma seperated values) from collect.cfg, trim the whitespaces around the comma to make them proper and valid metadata names.

File:

• gsdl/trunk/perllib/plugins/HTMLPlug.pm (modified) (1 diff)

gsdl/trunk/perllib/plugins/HTMLPlug.pm

@@ -1187 +1187 @@
 
     foreach my $field (split /,/, $self->{'metadata_fields'}) {
+        $field =~ s/^\s+//; # remove leading whitespace
+        $field =~ s/\s+$//; # remove trailing whitespace
+
     # support tag<tagname>
     if ($field =~ /^(.*?)<(.*?)>$/) {