Changeset 32305 for main/trunk/greenstone2/perllib/plugins/PDFv2Plugin.pm
- Timestamp:
- 2018-07-27T18:31:59+12:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/PDFv2Plugin.pm
r32303 r32305 31 31 no strict 'subs'; # allow filehandles to be variables and viceversa 32 32 33 use ConvertBinaryFile; 34 use PDFBoxConverter; 33 35 use ReadTextFile; 36 34 37 use unicode; 35 38 use Mojo::DOM; # for HTML parsing 36 39 37 use PDFBoxConverter;38 use ConvertBinaryFile;39 40 40 41 @PDFv2Plugin::ISA = ('ConvertBinaryFile', 'PDFBoxConverter', 'ReadTextFile'); … … 124 125 push(@{$hashArgOptLists->{"OptList"}},$options); 125 126 126 my $pdfbox_converter_self = new PDFBoxConverter($pluginlist, $inputargs, $hashArgOptLists); 127 # the 1 at the end of the first constructor call is to allow extra arguments to remain after 128 # parsing. There should be no extra args after the final constructor call, because all args 129 # should have been parsed by then, so don't pass 1 to the last constructor. 130 my $pdfbox_converter_self = new PDFBoxConverter($pluginlist, $inputargs, $hashArgOptLists, 1); 127 131 my $cbf_self = new ConvertBinaryFile($pluginlist, $inputargs, $hashArgOptLists); 128 132 my $self = BaseImporter::merge_inheritance($pdfbox_converter_self, $cbf_self); # this param order seems necessary to preserve the default/user-selected value for the convert_to option
Note:
See TracChangeset
for help on using the changeset viewer.