Changeset 26973 for main/trunk

Timestamp:

2013-02-28T15:30:44+13:00 (11 years ago)

Author:

kjdon

Message:

don't lowercase the suffix in rename_file - if the original was uppercase, eg .JPG then it won't match .jpg when GLI reads through archive files to find metadata. David can't remember why he did it in the first place. I think there must have been a reason, so maybe it will show up again one day...

File:

• main/trunk/greenstone2/perllib/util.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/util.pm

@@ -1601 +1601 @@
     $suffix = "";
     }
-    else {
-    $suffix = lc($suffix);
-    }
+    # This breaks GLI matching extracted metadata to files in Enrich panel, as
+    # original is eg .JPG while gsdlsourcefilename ends up .jpg
+    # Not sure why it was done in first place...
+    #else {
+    #$suffix = lc($suffix);
+    #}
 
     if ($rename_method eq "url") {