commit - a0b4d4b33ad4f49df0be56f40c6472f8912aafd8
commit + eefeacb762d9f60570979fd1a020bed3d4789847
blob - c299b4d794f29656c7226a087f5f9cbc2ee5b7bf
blob + f733b10708e9e2a8ef43873c4d1835d64760b33a
--- mkindex
+++ mkindex
@@ -123,8 +123,17 @@ EOF
 	}
 }
 
+sub endthread {
+	say $tfh "</ul></li>" x $last_level;
+	say $tfh "</ul></div>\n";
+	endpage($tfh);
+	close($tfh);
+
+	$last_level = 0;
+}
+
 sub nextthread {
-	endthread() if defined($tfh);
+	endthread if defined $tfh;
 	my ($mid, $subj) = @_;
 	my $dest = "$outdir/thread/$mid.html";
 	open($tfh, '>', $dest) or die "can't open $dest: $!";
@@ -140,15 +149,6 @@ sub nextthread {
 	# print $tfh "<div class='thread'><ul class='mails'>\n";
 }
 
-sub endthread {
-	say $tfh "</ul></li>" x $last_level;
-	say $tfh "</ul></div>\n";
-	endpage($tfh);
-	close($tfh);
-
-	$last_level = 0;
-}
-
 sub entry {
 	my ($fh, $type, $mid, $date, $from, $subj) = @_;
 	print $fh "<li id='$mid' class='mail'>";