Ignore:
Timestamp:
2009-04-23T15:18:09+12:00 (15 years ago)
Author:
kjdon
Message:

renamed string keys to match classifier name

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r18619 r19234  
    6464my $arguments =
    6565    [ { 'name' => "metadata",
    66     'desc' => "{GenericList.metadata}",
     66    'desc' => "{List.metadata}",
    6767    'type' => "metadata",
    6868    'reqd' => "yes" },
    … …  
    7070      # The interesting options
    7171      { 'name' => "bookshelf_type",
    72     'desc' => "{List.bookshelf_types}",
     72    'desc' => "{List.bookshelf_type}",
    7373    'type' => "enum",
    7474    'list' => $bookshelf_type_list,
    7575    'deft' => "duplicate_only" },
    7676      { 'name' => "classify_sections",
    77     'desc' => "{GenericList.classify_sections}",
     77    'desc' => "{List.classify_sections}",
    7878    'type' => "flag" },
    7979      { 'name' => "partition_type_within_level",
    80     'desc' => "{GenericList.partition_type_within_level}",
     80    'desc' => "{List.partition_type_within_level}",
    8181    'type' => "string",
    8282    'deft' => "none" },
    8383      { 'name' => "partition_size_within_level",
    84     'desc' => "{GenericList.partition_size_within_level}",
     84    'desc' => "{List.partition_size_within_level}",
    8585    'type' => "int",
    8686    'range' => "1,",
    8787    'deft' => "39" },
    8888      { 'name' => "partition_name_length",
    89     'desc' => "{GenericList.partition_name_length}",
     89    'desc' => "{List.partition_name_length}",
    9090    'type' => "string" },
    9191      { 'name' => "sort_leaf_nodes_using",
    92     'desc' => "{GenericList.sort_leaf_nodes_using}",
     92    'desc' => "{List.sort_leaf_nodes_using}",
    9393    'type' => "metadata",
    9494    'deft' => "Title" },
    9595      { 'name' => "sort_using_unicode_collation",
    96     'desc' => "{GenericList.sort_using_unicode_collation}",
     96    'desc' => "{List.sort_using_unicode_collation}",
    9797    'type' => "flag" },
    9898      { 'name' => "use_hlist_for",
    99     'desc' => "{GenericList.use_hlist_for}",
     99    'desc' => "{List.use_hlist_for}",
    100100    'type' => "string" },
    101101      { 'name' => "removeprefix",
    … …  
    107107
    108108my $options = { 'name'     => "List",
    109         'desc'     => "{GenericList.desc}",
     109        'desc'     => "{List.desc}",
    110110        'abstract' => "no",
    111111        'inherits' => "yes",
Note: See TracChangeset for help on using the changeset viewer.