Changeset 26222 for main/trunk
- Timestamp:
- 2012-09-20T09:36:42+12:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/PagedImagePlugin.pm
r25971 r26222 344 344 $doc_obj = $self->{'doc_obj'}; 345 345 } else { 346 my ($dir );347 ($dir, $ file) = $filename_full_path =~ /^(.*?)([^\/\\]*)$/;346 my ($dir, $item_file); 347 ($dir, $item_file) = $filename_full_path =~ /^(.*?)([^\/\\]*)$/; 348 348 349 349 #process the .item file 350 $doc_obj = $self->process_item($filename_full_path, $dir, $ file, $processor, $metadata);350 $doc_obj = $self->process_item($filename_full_path, $dir, $item_file, $processor, $metadata); 351 351 352 352 } … … 362 362 $self->extra_metadata ($doc_obj, $section, $metadata); 363 363 $self->auto_extract_metadata ($doc_obj); 364 364 $self->plugin_specific_process($base_dir, $file, $doc_obj, $gli); 365 365 # if we haven't found any Title so far, assign one 366 366 $self->title_fallback($doc_obj,$section,$filename_no_path); … … 368 368 $self->add_OID($doc_obj); 369 369 return (1,$doc_obj); 370 } 371 # override this for an inheriting plugin to add extra metadata etc 372 sub plugin_specific_process { 373 my $self = shift(@_); 374 my ($base_dir, $file, $doc_obj, $gli) = @_; 375 370 376 } 371 377
Note:
See TracChangeset
for help on using the changeset viewer.