diff options
author | Joey Hess <joey@gnu.kitenet.net> | 2009-08-12 12:49:16 -0400 |
---|---|---|
committer | Joey Hess <joey@gnu.kitenet.net> | 2009-08-12 12:49:16 -0400 |
commit | 63ce4459f58b69ac8bac418b85b789486ac775b1 (patch) | |
tree | 073219979455dc21c99fe99eff5eaf6f8fbee779 /IkiWiki | |
parent | 906c8f6e5837a1de5e032d40eba0856b9918bbee (diff) | |
download | ikiwiki-63ce4459f58b69ac8bac418b85b789486ac775b1.tar ikiwiki-63ce4459f58b69ac8bac418b85b789486ac775b1.tar.gz |
fix some more foreaches that clal functions to not use $_
Diffstat (limited to 'IkiWiki')
-rw-r--r-- | IkiWiki/Render.pm | 11 |
1 files changed, 6 insertions, 5 deletions
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}; } } } |