Changeset 36373 for main/trunk/greenstone2/perllib/plugins/LOMPlugin.pm

Timestamp:

2022-08-16T19:45:27+12:00 (20 months ago)

Author:

kjdon

Message:

now I have removed commented out code from last commit

File:

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

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

@@ -32 +32 @@
 package LOMPlugin;
 
-use extrametautil;
 use ReadTextFile;
 use MetadataPass;
@@ -177 +176 @@
     }
     $self->{'lom_srcdoc'} = undef; # reset for next file to be processed
-    # Indexing into the extrameta data structures requires the filename's style of slashes to be in URL format
-    # 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".
-    if (0) {
-    $file_re = &util::filepath_to_url_format($file_re);
-    $file_re = &util::filename_to_regex($file_re);
-    $self->{'lom_srcdoc'} = undef; # reset for next file to be processed
-
-    &extrametautil::addmetakey($extrametakeys, $file_re);
-    &extrametautil::setmetadata($extrametadata, $file_re, $self->{'saved_metadata'});
-    if (defined $lom_srcdoc) {
-    # copied from oaiplugin
-    if (!defined &extrametautil::getmetafile($extrametafile, $file_re)) {
-        &extrametautil::setmetafile($extrametafile, $file_re, {});
-    }
-     #maps the file to full path
-    &extrametautil::setmetafile_for_named_file($extrametafile, $file_re, $file, $filename_full_path);
-    }
-    }
+
     return 1;
 }