Changeset 11350 for trunk/gsdl/bin/script/explode_metadata_database.pl

Timestamp:

2006-03-13T15:53:00+13:00 (18 years ago)

Author:

mdewsnip

Message:

Removed the "-filename_field" option from explode_metadata_database.pl. A similar effect can now be achieved using the "-document_field" option.

File:

• trunk/gsdl/bin/script/explode_metadata_database.pl (modified) (4 diffs)

trunk/gsdl/bin/script/explode_metadata_database.pl

@@ -68 +68 @@
       { 'name' => "document_suffix",
     'desc' => "{explode.document_suffix}",
-    'type' => "string",
-    'reqd' => "no"},
-      { 'name' => "filename_field",
-    'desc' => "{explode.filename_field}",
     'type' => "string",
     'reqd' => "no"},
@@ -95 +91 @@
 sub main
 {
-    my ($language, $input_encoding, $metadata_set, $plugin, $filename_field, 
+    my ($language, $input_encoding, $metadata_set, $plugin, 
     $document_field, $document_prefix, $document_suffix, $verbosity);
 
@@ -155 +151 @@
     }
 
-    #check filename field
-    if (defined $filename_field && $filename_field eq "") {
-    undef $filename_field;
-    }
     my $plugobj;
     require "$plugin.pm";
@@ -225 +217 @@
     # do we need to create a dummy doc??
     if (not defined $document_file) {
-        # try to get a file name
-        if (defined $filename_field) {
-        
-        my $meta = $doc_obj->get_metadata_element($doc_obj->get_top_section(), $filename_field);
-        if (defined $meta) {
-            $meta =~ s/&\w{1,10};//g; # remove entities
-            $document_file = "$meta.nul";
-            my $num = 0;
-            while (-e "$documents_directory/$document_file") {
-            $num++;
-            $document_file = "$meta$num.nul";
-            }
-        } else {
-            $record_number = $record_number + 1;
-            $document_file = sprintf("%4.4d", $record_number) . ".nul";
-        }
-        } else {
-        $record_number = $record_number + 1;
-        $document_file = sprintf("%4.4d", $record_number) . ".nul";
-        }
+        $record_number = $record_number + 1;
+        $document_file = sprintf("%4.4d", $record_number) . ".nul";
 
         open(DUMMY_FILE, ">$documents_directory/$document_file");