From 8eba6d450c8225e01871b7b53cc17a08b7921266 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Stefan=20M=C3=BCller?= <stefan.mueller@aksdb.de>
Date: Thu, 30 Sep 2010 12:02:22 +0200
Subject: [PATCH] - Updated find pattern

---
 pret-pas.lua                | 4 ++--
 test-file/pret-pas_test.tex | 4 +++-
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/pret-pas.lua b/pret-pas.lua
index f2e4d46..b49f8c6 100644
--- a/pret-pas.lua
+++ b/pret-pas.lua
@@ -99,7 +99,7 @@ function visualizer.flush_line(str, nested)
 
 	--state = buffers.changestate(1, state)
 	for c in string.utfcharacters(str) do
-		if string.find(c, "^[%a%_]$") then
+		if string.find(c, "^[%a_]$") then
 			-- char belongs to identifier
 			if word then
 				word = word .. c
@@ -140,7 +140,7 @@ function visualizer.flush_line(str, nested)
 	end
 	flush_pas_word(word)
 	word = nil
-
+	
 --[[
     local code, comment = string.match(str,"^(.-)%-%-%[%[(.*)$")
     if comment then
diff --git a/test-file/pret-pas_test.tex b/test-file/pret-pas_test.tex
index 69ad6d4..d69fc5f 100644
--- a/test-file/pret-pas_test.tex
+++ b/test-file/pret-pas_test.tex
@@ -24,7 +24,9 @@ end;
 
 \startPAS
 My_Variable := _Variable;
+aaa asm for end For END
+aaa aSM foR eNd For END
 45My_Variable := _Variable45;
-&for
+&for asm blub
 \stopPAS
 \stoptext
\ No newline at end of file