Fixes regression due to PR 169

56143a26 · Chris Hansen · 5c5c90b6 · 56143a26
Commit 56143a26 authored May 07, 2014 by Chris Hansen
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

fortrancode.l src/fortrancode.l +1 -1

No files found.
--- a/src/fortrancode.l
+++ b/src/fortrancode.l
@@ -751,7 +751,7 @@ PREFIX    (RECURSIVE{BS_}|IMPURE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,3}(RECURSIVE|I
  					  codifyLines(yytext);
 					  endFontClass();
 					}
-<Start>^{BS}(CASE|CLASS|TYPE){BS_}(IS|DEFAULT) {
+<Start>{BS}(CASE|CLASS|TYPE){BS_}(IS|DEFAULT) {
                                          startFontClass("keywordflow");
                                          codifyLines(yytext);
                                          endFontClass();