Changeset 38801 for main/trunk/greenstone2

Timestamp:

2024-02-28T10:59:16+13:00 (3 months ago)

Author:

kjdon

Message:

standardising on top_section rather than section or topsection when we have a top section

File:

• main/trunk/greenstone2/perllib/plugins/HathiTrustMETSPlugin.pm (modified) (5 diffs)

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

@@ -240 +240 @@
 
 
-    my $section = $doc_obj->get_top_section();
+    my $top_section = $doc_obj->get_top_section();
         
-    $doc_obj->add_utf8_metadata($section, "Plugin", "$self->{'plugin_type'}");
-    $doc_obj->add_metadata($section, "FileFormat", "HathiTrustMETS");
+    $doc_obj->add_utf8_metadata($top_section, "Plugin", "$self->{'plugin_type'}");
+    $doc_obj->add_metadata($top_section, "FileFormat", "HathiTrustMETS");
 
     my $file_dirname = &File::Basename::dirname($file);
@@ -251 +251 @@
     # note that this metadata is associated with the top level section
     $self->add_associated_files($doc_obj, $filename_full_path);
-    $self->extra_metadata ($doc_obj, $section, $metadata);
+    $self->extra_metadata ($doc_obj, $top_section, $metadata);
     $self->auto_extract_metadata ($doc_obj);
     $self->plugin_specific_process($base_dir, $file, $doc_obj, $gli);
     # if we haven't found any Title so far, assign one
-    $self->title_fallback($doc_obj,$section,$filename_no_path);
+    $self->title_fallback($doc_obj,$top_section,$filename_no_path);
 
     if ($self->{'metadata_mapping_rules'}) {
@@ -274 +274 @@
     my ($filename_full_path, $filename_no_path) = &util::get_full_filenames($base_dir, $file);
 
-    my $topsection = $doc_obj->get_top_section();
+    my $top_section = $doc_obj->get_top_section();
 
     my $json_metadata_filename = $filename_full_path;
@@ -300 +300 @@
 
         if ($md_name eq "title") {
-        $doc_obj->set_utf8_metadata_element ($topsection, "Title", $md_value);
-        $doc_obj->set_utf8_metadata_element ($topsection, "dc.Title", $md_value);
+        $doc_obj->set_utf8_metadata_element ($top_section, "Title", $md_value);
+        $doc_obj->set_utf8_metadata_element ($top_section, "dc.Title", $md_value);
         }
         else {
-        $doc_obj->set_utf8_metadata_element ($topsection, $md_name, $md_value);
+        $doc_obj->set_utf8_metadata_element ($top_section, $md_name, $md_value);
         }
     }
@@ -314 +314 @@
     $docNameIE =~ s/^.*?\.//;
 
-    $doc_obj->set_utf8_metadata_element ($topsection, "docName", $docName);
-    $doc_obj->set_utf8_metadata_element ($topsection, "docNameIE", $docNameIE);
+    $doc_obj->set_utf8_metadata_element ($top_section, "docName", $docName);
+    $doc_obj->set_utf8_metadata_element ($top_section, "docNameIE", $docNameIE);
 
 }