From: Kenichi Handa <handa@m17n.org>
Date: Sun, 7 Sep 2008 01:14:58 +0000 (+0000)
Subject: Compose combining characters only when it
X-Git-Tag: emacs-pretest-23.0.90~2977
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=21e5e72e895f0e847b5ee335602bf3d881c12439;p=emacs.git

Compose combining characters only when it
follows an character matching with "[[:alpha:]]".
---

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)