Changeset 31480 for main/trunk/greenstone2/perllib/plugins/HathiTrustMETSPlugin.pm

Timestamp:

2017-03-09T14:35:57+13:00 (7 years ago)

Author:

kjdon

Message:

util::block_file moved to EncodingUtil::block_raw_filename

File:

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

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

@@ -514 +514 @@
     my ($file_root) = ($filename_full_path =~ m/^(.*)\.mets\.xml$/);
 
-    &util::block_filename($block_hash,"$file_root.zip");
-    &util::block_filename($block_hash,"$file_root.json");
+    $self->block_raw_filename($block_hash,"$file_root.zip");
+    $self->block_raw_filename($block_hash,"$file_root.json");
 
     my $page_dir = $file_root;
@@ -530 +530 @@
         my $txt_filename = &FileUtils::filenameConcatenate($page_dir,$1);
         my $topics_filename = $txt_filename . ".topics";
-        &util::block_filename($block_hash,$txt_filename);
-        &util::block_filename($block_hash,$topics_filename);
+        $self->block_raw_filename($block_hash,$txt_filename);
+        $self->block_raw_filename($block_hash,$topics_filename);
     }
     }