Changeset 32159 for main/trunk/greenstone2/perllib/plugins
- Timestamp:
- 2018-03-13T15:59:21+13:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/MetadataXMLPlugin.pm
r31492 r32159 252 252 $self->{'metadata-file'} = $file; 253 253 $self->{'metadata-filename'} = $filename; 254 254 255 255 my $outhandle = $self->{'outhandle'}; 256 256 257 257 print STDERR "\n<Processing n='$file' p='MetadataXMLPlugin'>\n" if ($gli); 258 258 print $outhandle "MetadataXMLPlugin: processing $file\n" if ($self->{'verbosity'})> 1; 259 260 # In order to prevent blind reprocessing of the same old docs upon *incremental* building 261 # whenever we encounter a default empty metadata.xml that has no content defined (attaches 262 # no meta), we write an entry for *each* metadata.xml into archiveinf-src.db 263 print $outhandle "MetadataXMLPlugin: writing an entry for this metadata.xml into archiveinf-src.db\n" if ($self->{'verbosity'})> 1; 264 $processor->add_metaxml_file_entry_to_archiveinfsrc($filename); # pass in the full filename, like BasePlugout::archiveinf_db() does 265 266 259 267 # add the file to the block list so that it won't be processed in read, as we will do all we can with it here 260 268 $self->block_raw_filename($block_hash,$filename); … … 277 285 return -1; #error 278 286 } 279 287 280 288 return 1; 281 289
Note:
See TracChangeset
for help on using the changeset viewer.