Changeset 6761


Ignore:
Timestamp:
2004-02-10T14:59:19+13:00 (20 years ago)
Author:
kjdon
Message:

the buttonname and/or sort defaults were in English - replaced them with a key name for the strings db

Location:
trunk/gsdl/perllib/classify
Files:
5 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/perllib/classify/AZCompactList.pm

    r6482 r6761  
    6464    'desc' => "{AZCompactList.buttonname}",
    6565    'type' => "string",
    66     'deft' => "{AZCompactList.metadata.deft}",
     66    'deft' => "{BasClas.metadata.deft}",
    6767    'reqd' => "no" },
    6868      { 'name' => "sort",

  • trunk/gsdl/perllib/classify/AZList.pm

    r6408 r6761  
    4444    'desc' => "{AZList.buttonname}",
    4545    'type' => "string",
    46     'deft' => "Metadata element specified with -metadata",
     46    'deft' => "{BasClas.metadata.deft}",
    4747    'reqd' => "no" },
    4848      { 'name' => "removeprefix",

  • trunk/gsdl/perllib/classify/AZSectionList.pm

    r6408 r6761  
    5353    'desc' => "{AZList.buttonname}",
    5454    'type' => "string",
    55     'deft' => "Metadata element specified with -metadata",
     55    'deft' => "{BasClas.metadata.deft}",
    5656    'reqd' => "no" } ];
    5757

  • trunk/gsdl/perllib/classify/Hierarchy.pm

    r6408 r6761  
    6868    'desc' => "{Hierarchy.buttonname}",
    6969    'type' => "string",
    70     'deft' => "Metadata element specified with -metadata",
     70    'deft' => "{BasClas.metadata.deft}",
    7171    'reqd' => "no" },
    7272      { 'name' => "sort",
    7373    'desc' => "{Hierarchy.sort}",
    7474    'type' => "string",
    75     'deft' => "Metadata field specified with -metadata",
     75    'deft' => "{BasClas.metadata.deft}",
    7676    'reqd' => "no" },
    7777      { 'name' => "hlist_at_top",
    … …  
    182182    # read in the subject file
    183183    my $list = &cfgread::read_cfg_file ($self->{'subjectfile'}, undef, '^[^#]?\w');
    184    
    185184    # $list is a hash that is indexed by the descriptor. The contents of this
    186185    # hash is a list of two items. The first item is the OID and the second item

  • trunk/gsdl/perllib/classify/List.pm

    r6408 r6761  
    5757    'desc' => "{List.buttonname}",
    5858    'type' => "string",
    59     'deft' => "Metadata element specified with -metadata",
     59    'deft' => "{BasClas.metadata.deft}",
    6060    'reqd' => "no" },
    6161      { 'name' => "sort",
    6262    'desc' => "{List.sort}",
    6363    'type' => "string",
    64     'deft' => "Metadata field specified with -metadata",
     64    'deft' => "{BasClas.metadata.deft}",
    6565    'reqd' => "no" } ];
    6666
Note: See TracChangeset for help on using the changeset viewer.