From mboxrd@z Thu Jan  1 00:00:00 1970
Received: from krisdoz.my.domain (kristaps@localhost [127.0.0.1])
	by krisdoz.my.domain (8.14.3/8.14.3) with ESMTP id p6NDV3Ic026001
	for <source@mdocml.bsd.lv>; Sat, 23 Jul 2011 09:31:04 -0400 (EDT)
Received: (from kristaps@localhost)
	by krisdoz.my.domain (8.14.3/8.14.3/Submit) id p6NDV37A004153;
	Sat, 23 Jul 2011 09:31:03 -0400 (EDT)
Date: Sat, 23 Jul 2011 09:31:03 -0400 (EDT)
Message-Id: <201107231331.p6NDV37A004153@krisdoz.my.domain>
X-Mailinglist: mdocml-source
Reply-To: source@mdocml.bsd.lv
MIME-Version: 1.0
From: kristaps@mdocml.bsd.lv
To: source@mdocml.bsd.lv
Subject: mdocml: Raise a warning when text follows the `EN'.
X-Mailer: activitymail 1.26, http://search.cpan.org/dist/activitymail/
Content-Type: text/plain; charset=utf-8

Log Message:
-----------
Raise a warning when text follows the `EN'.

Modified Files:
--------------
    mdocml:
        eqn.c

Revision Data
-------------
Index: eqn.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/eqn.c,v
retrieving revision 1.34
retrieving revision 1.35
diff -Leqn.c -Leqn.c -u -p -r1.34 -r1.35
--- eqn.c
+++ eqn.c
@@ -285,9 +285,15 @@ eqn_read(struct eqn_node **epp, int ln, 
 	 * validate the full equation.
 	 */
 
-	if (0 == strcmp(p, ".EN")) {
+	if (0 == strncmp(p, ".EN", 3)) {
 		er = eqn_end(ep);
 		*epp = NULL;
+		p += 3;
+		while (' ' == *p || '\t' == *p)
+			p++;
+		if ('\0' == *p) 
+			return(er);
+		mandoc_msg(MANDOCERR_ARGSLOST, ep->parse, ln, pos, NULL);
 		return(er);
 	}
 
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv