From 56143a268898249a63bb0a443e09dc2c77ec9ce9 Mon Sep 17 00:00:00 2001
From: Chris Hansen <hansec@uw.edu>
Date: Wed, 7 May 2014 13:48:58 -0400
Subject: Fixes regression due to PR 169

---
 src/fortrancode.l | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fortrancode.l b/src/fortrancode.l
index aaa8510..a21dc56 100644
--- 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();
-- 
cgit v0.12