Changeset 6084


Ignore:
Timestamp:
2003-12-02T16:24:59+13:00 (20 years ago)
Author:
jrm21
Message:

finally tracked down and fixed problem with last letter being out of
order in some circumstances.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/perllib/classify/AZCompactList.pm

    r5790 r6084  
    822822        @currentOIDs = ();
    823823        $currentfirstletter = "";
     824        $lastkey=$subsection;
    824825        } else {
    825826        @currentOIDs = @{$classhashref->{$subsection}};
Note: See TracChangeset for help on using the changeset viewer.