Changeset 14928 for gsdl/trunk/perllib/plugins/ConvertToPlug.pm
- Timestamp:
- 2007-12-20T17:48:11+13:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/ConvertToPlug.pm
r12961 r14928 443 443 $self->title_fallback($doc_obj,$doc_obj->get_top_section(),$filemeta); 444 444 445 # # add an OID 446 # $doc_obj->set_OID(); 447 445 448 # add an OID 446 $doc_obj->set_OID(); 449 # see if there is a plugin-specific set_OID function... 450 if (defined ($self->can('set_OID'))) { 451 # it will need $doc_obj to set the Identifier metadata... 452 $self->set_OID($doc_obj); 453 } else { 454 # use the default set_OID() in doc.pm 455 $doc_obj->set_OID(); 456 } 457 458 447 459 # process the document 448 460 $processor->process($doc_obj);
Note:
See TracChangeset
for help on using the changeset viewer.