Changeset 18568


Ignore:
Timestamp:
2009-02-20T17:08:47+13:00 (12 years ago)
Author:
kjdon
Message:

file contents change for name change

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/classify/List.pm

    r18567 r18568  
    11###########################################################################
    22#
    3 # GenericList.pm -- A general and flexible list classifier with most of
     3# List.pm -- A general and flexible list classifier with most of
    44#                   the abilities of AZCompactList, and better Unicode,
    55#                   metadata and sorting capabilities.
     
    3232###########################################################################
    3333
    34 package GenericList;
     34package List;
    3535
    3636
     
    4141
    4242sub BEGIN {
    43     @GenericList::ISA = ('BaseClassifier');
     43    @List::ISA = ('BaseClassifier');
    4444}
    4545
     
    7979    'type' => "string" } ];
    8080
    81 my $options = { 'name'     => "GenericList",
     81my $options = { 'name'     => "List",
    8282        'desc'     => "{GenericList.desc}",
    8383        'abstract' => "no",
     
    104104    # The metadata elements to use (required)
    105105    if (!$self->{'metadata'}) {
    106     die "Error: No metadata fields specified for GenericList.\n";
     106    die "Error: No metadata fields specified for List.\n";
    107107    }
    108108    my @metadata_groups = split(/\//, $self->{'metadata'});
Note: See TracChangeset for help on using the changeset viewer.