From e60f0f3981c91ffa13803f21f00d178bf87855a0 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Fri, 6 Feb 1987 10:27:57 +0000
Subject: [PATCH] bug fix

---
 modules/src/read_em/reade.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/modules/src/read_em/reade.c b/modules/src/read_em/reade.c
index 16ba0c0fd..7c71bb362 100644
--- a/modules/src/read_em/reade.c
+++ b/modules/src/read_em/reade.c
@@ -619,7 +619,12 @@ gethead()
 	argnum = 1;
 	for (;;) {	
 		EM_lineno++;
-		if ((c = getbyte()) == EOF) return 0;
+		c = getbyte();
+		if (c == COMMENTSTARTER) {
+			do	c = getbyte();
+			while (c != '\n' && c != EOF);
+		}
+		if (c == EOF) return 0;
 		if (c == '\n') continue;
 		if (isspace(c)) {
 			c = nospace();
-- 
2.34.1