From 3226b0551aabd9cfeaa540c6bef0d5207172b266 Mon Sep 17 00:00:00 2001
From: Trygve Laugstøl <trygvis@inamo.no>
Date: Fri, 11 Jul 2025 08:40:10 +0200
Subject: Much improved page joining.

---
 stage-2.awk | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'stage-2.awk')

diff --git a/stage-2.awk b/stage-2.awk
index 2e85ece..46cba76 100644
--- a/stage-2.awk
+++ b/stage-2.awk
@@ -14,9 +14,9 @@ BEGIN {
 	if (match($0, /^ *[0-9]* *Constance *Ring *[0-9]* *$/)) {
 		if (prev != "") {
 			print prev
-		} else {
-			extra_nl = 1
 		}
+		extra_nl = 1
+
 		getline
 		$0 = ""
 		prev = ""
@@ -31,9 +31,9 @@ BEGIN {
 #			printf "m='%s'\n", m
 			u = match(m, /^[^A-Za-z]*[A-Z].*/)
 #			printf "u=%d, l=%d", u, l
-#			printf "u=%d, RSTART=%d, RLENGTH=%d, ", u, RSTART, RLENGTH
+#			printf "RSTART=%d, RLENGTH=%d, ", u, RSTART, RLENGTH
 			l = match(m, /^[^A-Za-z]*[a-z]/)
-#			printf "l=%d, RSTART=%d, RLENGTH=%d", l, RSTART, RLENGTH
+#			printf "RSTART=%d, RLENGTH=%d\n", l, RSTART, RLENGTH
 			if (u > l) {
 				printf "\n", prev
 			}
-- 
cgit v1.2.3