2 files changed, 5 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 8651cdf0..16ac14be 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2007-06-01  Sergey Poznyakoff  <gray@gnu.org.ua>
+
+	* src/lex.l: Fix line counting within here-documents
+
 2007-05-12  Sergey Poznyakoff  <gray@gnu.org.ua>
 
 	-= Release 4.0 =-
diff --git a/src/lex.l b/src/lex.l
index 017e835c..6b4aa8ee 100644
--- a/src/lex.l
+++ b/src/lex.l
@@ -851,6 +851,7 @@ end       return keyword(KW_END);
         line_add(p, strlen(p));
 }
 <CML>[^\\$%\n]*\n {
+        locus.line++;
         if (yyleng >= multiline_delimiter_len
             && memcmp(yytext, multiline_delimiter,
                       multiline_delimiter_len) == 0