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

Timestamp:

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

Author:

kjdon

Message:

List renamed to SimpleList

File:

• gsdl/trunk/perllib/classify/AZCompactSectionList.pm (modified) (2 diffs)

gsdl/trunk/perllib/classify/AZCompactSectionList.pm

@@ -88 +88 @@
 
     my $pm;
-    foreach $pm ("List", "SectionList")
+    foreach $pm ("SimpleList", "SectionList")
     {
     my $listname 
@@ -123 +123 @@
         if ($doclevel =~ m/^top(level)?/i)
         {
-            eval ("\$listclassobj = new List([],\$ptArgs)"); warn $@ if $@;
+            eval ("\$listclassobj = new SimpleList([],\$ptArgs)"); warn $@ if $@;
         }
         else