From 711703f98ce5169b4fca664f8ff532699aa4d2ee Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Tue, 21 Aug 2012 08:24:16 -0700 Subject: [PATCH] [rt.cpan.org #79109] Avoid each $scalar in TieHashDelta.pm This is dual-life, after all. --- dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm b/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm index dead99e..63986e2 100644 --- a/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm +++ b/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm @@ -68,7 +68,7 @@ sub FIRSTKEY { sub NEXTKEY { my ($self) = @_; - each $self->{changed}; + each %{$self->{changed}}; } 1; -- 2.7.4