diff options
| author | Kenichi Handa | 2009-02-12 05:42:56 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2009-02-12 05:42:56 +0000 |
| commit | ca451f4c7ec8da6d6e6be436dfd8ec939a5985f0 (patch) | |
| tree | 29673bdff43c09a106ec0da25a49a0cc2af2618b | |
| parent | 00c4240510a32dad1a170381d30d4303272af8ed (diff) | |
| download | emacs-ca451f4c7ec8da6d6e6be436dfd8ec939a5985f0.tar.gz emacs-ca451f4c7ec8da6d6e6be436dfd8ec939a5985f0.zip | |
Use "\\c." instead of "[[:alpha:]]" to match with
a base character.
| -rw-r--r-- | lisp/composite.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/composite.el b/lisp/composite.el index 537adab6e90..667f158a346 100644 --- a/lisp/composite.el +++ b/lisp/composite.el | |||
| @@ -646,7 +646,7 @@ All non-spacing characters has this function in | |||
| 646 | (setq i (1+ i)))) | 646 | (setq i (1+ i)))) |
| 647 | gstring)))))) | 647 | gstring)))))) |
| 648 | 648 | ||
| 649 | (let ((elt '(["[[:alpha:]]\\c^+" 1 compose-gstring-for-graphic] | 649 | (let ((elt '(["\\c.\\c^+" 1 compose-gstring-for-graphic] |
| 650 | [nil 0 compose-gstring-for-graphic]))) | 650 | [nil 0 compose-gstring-for-graphic]))) |
| 651 | (map-char-table | 651 | (map-char-table |
| 652 | #'(lambda (key val) | 652 | #'(lambda (key val) |