Changeset 3177 for trunk/protemix/perllib
- Timestamp:
- 2002-06-24T21:24:11+12:00 (22 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/protemix/perllib/plugins/ProtemixPlug.pm
r3168 r3177 120 120 121 121 # add any section level metadata we have for this page (set from within the meta.xml file) 122 if (defined ($self->{'section_metadata'}->{$filesuf})) { 123 foreach my $key (keys %{$self->{'section_metadata'}->{$filesuf}}) { 124 $doc_obj->add_utf8_metadata ($cursection, $key, $self->{'section_metadata'}->{$filesuf}->{$key}); 125 } 126 } 122 123 # currently commented out as we're not using Class1, Class2, and Class3 metadata yet 124 # if (defined ($self->{'section_metadata'}->{$filesuf})) { 125 # foreach my $key (keys %{$self->{'section_metadata'}->{$filesuf}}) { 126 # $doc_obj->add_utf8_metadata ($cursection, $key, $self->{'section_metadata'}->{$filesuf}->{$key}); 127 # } 128 # } 127 129 128 130 $count ++;
Note:
See TracChangeset
for help on using the changeset viewer.