From: Joey Hess Date: Wed, 12 Aug 2009 16:49:16 +0000 (-0400) Subject: fix some more foreaches that clal functions to not use $_ X-Git-Tag: 3.1415926~149 X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/commitdiff_plain/63ce4459f58b69ac8bac418b85b789486ac775b1 fix some more foreaches that clal functions to not use $_ --- diff --git a/IkiWiki/Render.pm b/IkiWiki/Render.pm index 5cb67ea07..fc8f287ce 100644 --- a/IkiWiki/Render.pm +++ b/IkiWiki/Render.pm @@ -379,12 +379,13 @@ sub refresh () { $links{$page}=[]; $renderedfiles{$page}=[]; $pagemtime{$page}=0; - prune($config{destdir}."/".$_) - foreach @{$oldrenderedfiles{$page}}; + foreach my $old (@{$oldrenderedfiles{$page}}) { + prune($config{destdir}."/".$old); + } delete $pagesources{$page}; - foreach (keys %destsources) { - if ($destsources{$_} eq $page) { - delete $destsources{$_}; + foreach my $source (keys %destsources) { + if ($destsources{$source} eq $page) { + delete $destsources{$source}; } } }