From 7f38038656650505d5a04a7f7ae335a1fbf8f0a7 Mon Sep 17 00:00:00 2001
From: nyamatongwe <unknown>
Date: Mon, 17 May 2010 02:48:46 +0000
Subject: Fix debug assertions for bug #3000566.

---
 src/LexLisp.cxx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/LexLisp.cxx')

diff --git a/src/LexLisp.cxx b/src/LexLisp.cxx
index e1d06cbac..ad5535f14 100644
--- a/src/LexLisp.cxx
+++ b/src/LexLisp.cxx
@@ -139,7 +139,7 @@ static void ColouriseLispDoc(unsigned int startPos, int length, int initStyle, W
 				}
 			}
 		} else if (state == SCE_LISP_MACRO_DISPATCH) {
-			if (!isdigit(ch)) {
+			if (!(isascii(ch) && isdigit(ch))) {
 				if (ch != 'r' && ch != 'R' && (i - styler.GetStartSegment()) > 1) {
 					state = SCE_LISP_DEFAULT;
 				} else {
-- 
cgit v1.2.3