Changeset 19234

Show
Ignore:
Timestamp:
23.04.2009 15:18:09 (11 years ago)
Author:
kjdon
Message:

renamed string keys to match classifier name

Location:
gsdl/trunk/perllib/classify
Files:
2 modified

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", 
  • gsdl/trunk/perllib/classify/SimpleList.pm

    r18569 r19234  
    4141my $arguments =  
    4242    [ { 'name' => "metadata", 
    43     'desc' => "{List.metadata}", 
     43    'desc' => "{SimpleList.metadata}", 
    4444    'type' => "metadata", 
    4545    'reqd' => "no" }, 
    4646      { 'name' => "sort", 
    47     'desc' => "{List.sort}", 
     47    'desc' => "{SimpleList.sort}", 
    4848    'type' => "metadata", 
    4949    'reqd' => "no" } ];