- Timestamp:
- 2011-07-29T13:14:05+12:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/EmbeddedMetadataPlugin.pm
r24290 r24349 265 265 sub metadata_read() 266 266 { 267 my $self = shift (@_); 268 my ($pluginfo, $base_dir, $file, $block_hash, 269 $extrametakeys, $extrametadata, $extrametafile, 270 $processor, $gli, $aux) = @_; 271 272 my ($filename_full_path, $filename_no_path) = &util::get_full_filenames($base_dir, $file); 273 274 # we don't want to process directories 275 if (!-f $filename_full_path || !$self->can_process_this_file($filename_full_path)) { 276 return undef; 277 } 278 print STDERR "\n<Processing n='$file' p='EmbeddedMetadataPlugin'>\n" if ($gli); 279 print STDERR "EmbeddedMetadataPlugin: processing $file\n" if ($self->{'verbosity'}) > 1; 280 281 $self->extractEmbeddedMetadata($filename_no_path,$filename_full_path, 282 $extrametadata,$extrametakeys); 283 267 my $self = shift (@_); 268 my ($pluginfo, $base_dir, $file, $block_hash, 269 $extrametakeys, $extrametadata, $extrametafile, 270 $processor, $gli, $aux) = @_; 271 272 my ($filename_full_path, $filename_no_path) = &util::get_full_filenames($base_dir, $file); 273 274 # we don't want to process directories 275 if (!-f $filename_full_path || !$self->can_process_this_file($filename_full_path)) { 284 276 return undef; 277 } 278 print STDERR "\n<Processing n='$file' p='EmbeddedMetadataPlugin'>\n" if ($gli); 279 print STDERR "EmbeddedMetadataPlugin: processing $file\n" if ($self->{'verbosity'}) > 1; 280 281 $self->extractEmbeddedMetadata($filename_no_path,$filename_full_path, 282 $extrametadata,$extrametakeys); 283 284 return undef; 285 285 } 286 286
Note:
See TracChangeset
for help on using the changeset viewer.