fix some more foreaches that clal functions to not use $_

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};
 				}
 			}
 		}