Changeset 20822

Show
Ignore:
Timestamp:
18.10.2009 10:58:13 (10 years ago)
Author:
kjdon
Message:

added collectdir and site options so can be used with a -collection in greenstone3

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/bin/script/explode_metadata_database.pl

    r20098 r20822  
    8282    'deft' => "100", 
    8383    '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" }, 
    8498      { 'name' => "collection", 
    8599    'desc' => "{explode.collection}", 
     
    120134{ 
    121135    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); 
    123139 
    124140    my $xml = 0; 
     
    187203    } 
    188204    if (defined $collection && $collection =~ /\w/) { 
    189     if (($collection = &colcfg::use_collection("", $collection, "")) eq "") { 
     205    if (($collection = &colcfg::use_collection($site, $collection, $collectdir)) eq "") { 
    190206        print STDERR "Collection $collection does not exist\n"; 
    191207        die "\n";