Changeset 8855

Timestamp:

2004-12-17T16:53:09+13:00 (19 years ago)

Author:

kjdon

Message:

added options removesuffix and removeprefix for use with sortmeta

File:

• trunk/gsdl/bin/script/import.pl (modified) (5 diffs)

trunk/gsdl/bin/script/import.pl

@@ -161 +161 @@
     'reqd' => "no",
     'modegli' => "3" },
+      { 'name' => "removeprefix",
+    'desc' => "{BasClas.removeprefix}",
+    'type' => "string",
+    'deft' => "",
+    'reqd' => "no" } ,
+      { 'name' => "removesuffix",
+    'desc' => "{BasClas.removesuffix}",
+    'type' => "string",
+    'deft' => "",
+    'reqd' => "no" }, 
       { 'name' => "statsfile",
     'desc' => "{import.statsfile}",
@@ -191 +201 @@
     $removeold, $saveas, $gzip, $groupsize, $OIDtype, $debug, 
     $maxdocs, $collection, $configfilename, $collectcfg, 
-    $pluginfo, $sortmeta, $archive_info_filename, $statsfile,
+    $pluginfo, $sortmeta, $removeprefix, $removesuffix, 
+    $archive_info_filename, $statsfile,
     $archive_info, $processor, $out, $faillog, $collectdir, $gli);
 
@@ -213 +224 @@
              'OIDtype/^(hash|incremental|assigned|dirname)$/', \$OIDtype,
              'sortmeta/.*/', \$sortmeta, 
+             'removeprefix/.*/', \$removeprefix,
+             'removesuffix/.*/', \$removesuffix,
              'debug', \$debug,
              'maxdocs/^\-?\d+/', \$maxdocs,
@@ -224 +237 @@
     die "\n";
     }
+
     # If $language has been specified, load the appropriate resource bundle
     # (Otherwise, the default resource bundle will be loaded automatically)
@@ -400 +414 @@
     $processor = new docsave ($collection, $archive_info, $verbosity, $gzip, $groupsize, $out, $service, $saveas);
     $processor->setarchivedir ($archivedir);
-    $processor->set_sortmeta ($sortmeta) if defined $sortmeta;
+    $processor->set_sortmeta ($sortmeta, $removeprefix, $removesuffix) if defined $sortmeta;
     $processor->set_OIDtype ($OIDtype);
     $processor->set_saveas ($saveas);