Changeset 18469 for gsdl/trunk/perllib/plugins/BasePlugin.pm
- Timestamp:
- 2009-02-06T18:19:44+13:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/BasePlugin.pm
r18441 r18469 833 833 834 834 my ($filename_full_path, $filename_no_path) = &util::get_full_filenames($base_dir, $file); 835 835 836 # create a new document 836 837 my $doc_obj = new doc ($filename_full_path, "indexed_doc", $self->{'file_rename_method'}); … … 840 841 $doc_obj->add_utf8_metadata($top_section, "FileSize", (-s $filename_full_path)); 841 842 843 842 844 # sets the UTF8 filename (Source) for display and sets the url ref to URL encoded version 843 845 # of the UTF8 filename (SourceFile) for generated files 844 846 $self->set_Source_metadata($doc_obj, $filename_no_path); 847 845 848 846 849 # plugin specific stuff - what args do we need here?? … … 946 949 # delete any temp files that we may have created 947 950 $self->clean_up_after_doc_obj_processing(); 951 948 952 949 953 # if process_status == 1, then the file has been processed.
Note:
See TracChangeset
for help on using the changeset viewer.