Changeset 18568

Timestamp:

2009-02-20T17:08:47+13:00 (15 years ago)

Author:

kjdon

Message:

file contents change for name change

File:

• gsdl/trunk/perllib/classify/List.pm (modified) (5 diffs)

gsdl/trunk/perllib/classify/List.pm

@@ -1 +1 @@
 ###########################################################################
 #
-# GenericList.pm -- A general and flexible list classifier with most of
+# List.pm -- A general and flexible list classifier with most of
 #                   the abilities of AZCompactList, and better Unicode,
 #                   metadata and sorting capabilities.
@@ -32 +32 @@
 ###########################################################################
 
-package GenericList;
+package List;
 
 
@@ -41 +41 @@
 
 sub BEGIN {
-    @GenericList::ISA = ('BaseClassifier');
+    @List::ISA = ('BaseClassifier');
 }
 
@@ -79 +79 @@
     'type' => "string" } ];
 
-my $options = { 'name'     => "GenericList",
+my $options = { 'name'     => "List",
         'desc'     => "{GenericList.desc}",
         'abstract' => "no",
@@ -104 +104 @@
     # The metadata elements to use (required)
     if (!$self->{'metadata'}) {
-    die "Error: No metadata fields specified for GenericList.\n";
+    die "Error: No metadata fields specified for List.\n";
     }
     my @metadata_groups = split(/\//, $self->{'metadata'});