diff --git a/glafp-utils/sgmlverb/sgmlverb.lex b/glafp-utils/sgmlverb/sgmlverb.lex
index c60520035aa480e356a6a2c9c8990cbe2d7d47e4..daa20ae2b9fcfdf6fe75a039195a5ccd01dbd624 100644
--- a/glafp-utils/sgmlverb/sgmlverb.lex
+++ b/glafp-utils/sgmlverb/sgmlverb.lex
@@ -14,6 +14,7 @@
 %START  NORM  VERB  VERBENV
 sp			[ \t]*
 nl			{sp}\n{sp}
+comment                 \%.*$
 miranda			([0-9]+(\-([0-9]+)?)?)?>
 %{
 #define PUSH		states[top++] =
@@ -27,6 +28,7 @@ miranda			([0-9]+(\-([0-9]+)?)?)?>
 			top = 0;
 <NORM>@@		{ printf ("@"); }
 <NORM>@			{ printf ("<tt>"); PUSH NORM;  BEGIN VERB; }
+<NORM>{comment}         { }
 <VERB>@			{ printf ("</tt>");  POP; }
 <VERB>@@		{ printf ("@"); }
 <VERB>\>		{ printf ("&gt;"); }