Changeset 37801 for gs2-extensions/pdf-box/trunk/java/perllib/plugins/PDFBoxConverter.pm

Timestamp:

2023-07-04T18:07:50+12:00 (10 months ago)

Author:

anupama

Message:

Dr Bainbridge's bugfix for something broken with PDFv2Plugin outputting pagedimgs. Beware: the filename readjustment undoes his changeset/32748. The commit message of that changeset isn't clear what bug exactly it fixed and how it fixed it (the details of why the fix was necessary). So until we remember what 32748 fixed and why it was necessary, this commit may be trading one fix in for another.

File:

• gs2-extensions/pdf-box/trunk/java/perllib/plugins/PDFBoxConverter.pm (modified) (1 diff)

gs2-extensions/pdf-box/trunk/java/perllib/plugins/PDFBoxConverter.pm

@@ -220 +220 @@
     # append the output filetype suffix only for non-image output formats, since for
     # images we can be outputting multiple image files per single PDF input file
-    #my $target_file = ($img_output_mode || $paged_txt_output_mode) ? "$file_root" : "$file_root.$target_file_type";
-    my $target_file = ($img_output_mode || $paged_txt_output_mode) ? "" : "$file_root.$target_file_type";
-    
-
+    #my $target_file = ($img_output_mode || $paged_txt_output_mode) ? "" : "$file_root.$target_file_type";
+    my $target_file = ($img_output_mode || $paged_txt_output_mode) ? "$file_root" : "$file_root.$target_file_type";
+    
     $target_file_path = &FileUtils::filenameConcatenate($cache_dir,$target_file);
+    
+    if($img_output_mode || $paged_txt_output_mode) {
+        if(!&FileUtils::directoryExists($target_file_path)) {
+        mkdir($target_file_path);
+        }
+    }
+        
+    # In this branch of the if-statement, we *don't* want this stored as part of 'pbtmp_file_path'  
     }
     else {