X-Git-Url: http://git.jankratochvil.net/?p=MyWeb.git;a=blobdiff_plain;f=Hash%2FRecordKeys.pm;h=c818c9a5a1cedee790c211839742097c89860906;hp=653c5a213f397a628069b9948c349e3b89057f8b;hb=0eb3009a25310162a0e83afd5baa9520a29c2cb5;hpb=f9da4afb617190969832c76df4a2642d9ad7accf;ds=sidebyside 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($$$)