Changeset 18566 for gsdl/trunk/perllib/classify/SectionList.pm

Timestamp:

2009-02-20T17:05:38+13:00 (15 years ago)

Author:

kjdon

Message:

List renamed to SimpleList

File:

• gsdl/trunk/perllib/classify/SectionList.pm (modified) (4 diffs)

gsdl/trunk/perllib/classify/SectionList.pm

@@ -24 +24 @@
 ###########################################################################
 
-# Same as List classifier but includes all sections of document
+# Same as SimpleList classifier but includes all sections of document
 # (excluding top level) rather than just top level document 
 # itself
@@ -31 +31 @@
 package SectionList;
 
-use List;
+use SimpleList;
 use sorttools;
 
@@ -38 +38 @@
 
 sub BEGIN {
-    @SectionList::ISA = ('List');
+    @SectionList::ISA = ('SimpleList');
 }
 
@@ -56 +56 @@
     push(@{$hashArgOptLists->{"OptList"}},$options);
 
-    my $self = new List($classifierslist, $inputargs, $hashArgOptLists);
+    my $self = new SimpleList($classifierslist, $inputargs, $hashArgOptLists);
 
     return bless $self, $class;