commit - e5f34c99e58c9f07f0d7bfc44a916a659084c05e
commit + e773a9f0e014b94bd68c3d9bf5eb12ec298b8f33
blob - 551438bad185c43c16f48ebab0b5ccd0fc3f5a69
blob + 4ce043ba1f44e3dde7a73c19700e0422ad9c2786
--- mkindex
+++ mkindex
@@ -89,23 +89,23 @@ sub fixfiles {
 	for (my $i = 0; $i <= $page; $i++) {
 		my $path = pagename($i);
 
-		open(my $page, '>>', $path)
-		    or die "can't open $page for append: $!";
+		open(my $pfh, '>>', $path)
+		    or die "can't open $path for append: $!";
 
 		if ($page > 1) {
 			my ($next, $prev) = (pagename($i+1), pagename($i-1));
 
-			say $page "<nav class='next-prev'>";
-			say $page "<a href='$first'>First</a>" if $i > 1;
-			say $page "<a href='$prev'>Prev</a>" if $i > 0;
-			say $page "<a href='$next'>Next</a>" if $i < $page;
-			say $page "<a href='$last'>Last</a>" if $i < $page - 1;
-			say $page "</nav>";
+			say $pfh "<nav class='next-prev'><!-- $pfh -->";
+			say $pfh "<a href='$first'>First</a>" if $i > 1;
+			say $pfh "<a href='$prev'>Prev</a>" if $i > 0;
+			say $pfh "<a href='$next'>Next</a>" if $i < $page;
+			say $pfh "<a href='$last'>Last</a>" if $i < $page - 1;
+			say $pfh "</nav>";
 		}
 
-		say $page "</main>";
-		endpage($page);
-		close($page);
+		say $pfh "</main>";
+		endpage($pfh);
+		close($pfh);
 		rename $path, "$outdir/$path";
 	}
 }