From 21e5e72e895f0e847b5ee335602bf3d881c12439 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sun, 7 Sep 2008 01:14:58 +0000 Subject: [PATCH] Compose combining characters only when it follows an character matching with "[[:alpha:]]". --- lisp/composite.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/composite.el b/lisp/composite.el index a86b3147023..fdf8dcd223c 100644 --- a/lisp/composite.el +++ b/lisp/composite.el @@ -635,7 +635,7 @@ All non-spacing characters has this function in (setq i (1+ i)))) gstring)))))) -(let ((elt '(["\\C^\\c^+" 1 compose-gstring-for-graphic] +(let ((elt '(["[[:alpha:]]\\c^+" 1 compose-gstring-for-graphic] [nil 0 compose-gstring-for-graphic]))) (map-char-table #'(lambda (key val) -- 2.39.5