X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;ds=sidebyside;f=Hash%2FRecordKeys.pm;h=c818c9a5a1cedee790c211839742097c89860906;hb=0eb3009a25310162a0e83afd5baa9520a29c2cb5;hp=653c5a213f397a628069b9948c349e3b89057f8b;hpb=1659aa828c1abf07a25720881622db337d421463;p=MyWeb.git diff --git a/Hash/RecordKeys.pm b/Hash/RecordKeys.pm index 653c5a2..c818c9a 100644 --- a/Hash/RecordKeys.pm +++ b/Hash/RecordKeys.pm @@ -41,7 +41,7 @@ sub accessed($) { my($self)=@_; - return keys(%{$self->{"keyshash"}}) + return sort keys(%{$self->{"keyshash"}}) } sub STORE($$$)