Changeset 20822 for gsdl/trunk/bin/script/explode_metadata_database.pl
- Timestamp:
- 2009-10-18T10:58:13+13:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/bin/script/explode_metadata_database.pl
r20098 r20822 82 82 'deft' => "100", 83 83 'reqd' => "no" }, 84 { 'name' => "collectdir", 85 'desc' => "{import.collectdir}", 86 'type' => "string", 87 # parsearg left "" as default 88 #'deft' => &util::filename_cat ($ENV{'GSDLHOME'}, "collect"), 89 'deft' => "", 90 'reqd' => "no", 91 'hiddengli' => "yes" }, 92 { 'name' => "site", 93 'desc' => "{import.site}", 94 'type' => "string", 95 'deft' => "", 96 'reqd' => "no", 97 'hiddengli' => "yes" }, 84 98 { 'name' => "collection", 85 99 'desc' => "{explode.collection}", … … 120 134 { 121 135 my ($language, $input_encoding, $metadata_set, $plugin, 122 $document_field, $document_prefix, $document_suffix, $records_per_folder, $plugin_options, $collection, $use_collection_plugin_options, $verbosity); 136 $document_field, $document_prefix, $document_suffix, 137 $records_per_folder, $plugin_options, $collectdir, $site, $collection, 138 $use_collection_plugin_options, $verbosity); 123 139 124 140 my $xml = 0; … … 187 203 } 188 204 if (defined $collection && $collection =~ /\w/) { 189 if (($collection = &colcfg::use_collection( "", $collection, "")) eq "") {205 if (($collection = &colcfg::use_collection($site, $collection, $collectdir)) eq "") { 190 206 print STDERR "Collection $collection does not exist\n"; 191 207 die "\n";
Note:
See TracChangeset
for help on using the changeset viewer.