greenstone.org greenstone wiki greenstone trac planet greenstone

Changeset 17895

Show
Ignore:
Timestamp:
2008-11-19 13:26:58 (2 months ago)
Author:
ak19
Message:

Added handling of infodbtype setting

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • gsdl/trunk/perllib/cfgread4gs3.pm

    r17747 r17895  
    6060use XML::Parser; 
    6161 
    62 # A mapping hash to resolve name descrepency between gs2 and gs3. 
     62# A mapping hash to resolve name discrepancy between gs2 and gs3. 
    6363my $nameMap = {"key" => "value", 
    6464               "creator" => "creator", 
    6565               "maintainer" => "maintainer", 
    6666               "public" => "public", 
     67               "infodb" => "infodbtype", 
    6768               "defaultIndex" => "defaultindex", 
    6869               "defaultLevel" => "defaultlevel", 
    …… 
    7879               "index" => "indexes", 
    7980               "plugin" => "plugin", 
    80            "plugout" => "plugout", 
     81              "plugout" => "plugout", 
    8182               "indexOption" => "indexoptions", 
    8283               "searchType" => "searchtype", 
    …… 
    116117     
    117118    # See http://search.cpan.org/~msergeant/XML-Parser-2.36/Parser.pm#Stream 
    118     # %_ is a hash of all the attributes of this element, we want to store them so we can use the attributes 
     119    # %_ is a hash of all the attributes of this element, we want to store them so we can use the attributes 
    119120    # when the textnode contents of the element are parsed in the subroutine Text (that's the handler for Text).  
    120121    $currentAttrRef = \%_;  
    …… 
    157158            $currentLocation = $name; 
    158159        } 
     160    } 
     161 
     162    #@ Handling database type: gdbm or gdbm-txtgz, later jdbm. 
     163    elsif ($element eq "infodb") { 
     164      $data->{'infodbtype'} = $type; 
    159165    } 
    160166