From 5d8f33f6ad0d8a2c45ed33dae3960ccde422a7cb Mon Sep 17 00:00:00 2001
From: Markus Armbruster <armbru@pond.sub.org>
Date: Sun, 28 Apr 2013 18:29:36 +0200
Subject: [PATCH] .SA should come last, make mksubj.pl enforce it

---
 info/mksubj.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/info/mksubj.pl b/info/mksubj.pl
index 1fbdb41f7..406390985 100644
--- a/info/mksubj.pl
+++ b/info/mksubj.pl
@@ -137,14 +137,14 @@ sub parse_file {
 	} else {
 	    error("Incorrect .SA Syntax.  Syntax should be '.SA \"item1, item2\"'");
 	}
-
-	while (<F>) {
-	    error("Multiple .SA requests.  Each file may contain at most one.") if /^\.SA/;
-	}
     } else {
 	error(".SA request is missing");
     }
 
+    if (<F>) {
+	error(".SA request must be the last line");
+    }
+
     $lines{$topic} = $.;
     close F;
 }
-- 
2.43.0