changeset 98069:43a801a18b24

Compose combining characters only when it follows an character matching with "[[:alpha:]]".
author Kenichi Handa <handa@m17n.org>
date Sun, 07 Sep 2008 01:14:58 +0000
parents 9723eb0d11ab
children b0d74e2658b7
files lisp/composite.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/composite.el	Sun Sep 07 01:11:46 2008 +0000
+++ b/lisp/composite.el	Sun Sep 07 01:14:58 2008 +0000
@@ -635,7 +635,7 @@
 	      (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)