Changeset 29820 for main/trunk/greenstone2/perllib

Timestamp:

2015-03-30T14:18:40+13:00 (9 years ago)

Author:

kjdon

Message:

EmbeddedMEtadataPlugin needs to make raw filenames into unicode for adding into extrametadata tables. changed this on linux. need to test on windows and mac

File:

• main/trunk/greenstone2/perllib/plugins/EmbeddedMetadataPlugin.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/plugins/EmbeddedMetadataPlugin.pm

@@ -419 +419 @@
     # Then need to convert the filename to a regex, no longer to protect windows directory chars \, but for
     # protecting special characters like brackets in the filepath such as "C:\Program Files (x86)\Greenstone".
+    print STDERR "file = $file " . &unicode::debug_unicode_string($file);
+    $file = &util::raw_filename_to_unicode(&util::filename_head($filename), $file);
+    print STDERR "$file ". &unicode::debug_unicode_string($file);
     $file = &util::filepath_to_url_format($file);
+    print STDERR "$file " . &unicode::debug_unicode_string($file);
     $file = &util::filename_to_regex($file); 
+    print STDERR "$file ".&unicode::debug_unicode_string($file) ."\n";
     
     # Associate the metadata now
@@ -462 +467 @@
     if (!$self->can_process_this_file_for_metadata($filename_full_path)) {
 
-    # Avoid scanning it with ExitTool ...
+    # Avoid scanning it with ExifTool ...
     # ... but let any other plugin in metadata_read() passes pipeline
     # consider it