Mercurial > emacs
changeset 63808:8db64e24d5dc
Add rules for inserting full-width space for
quail/Punct and quail/Punct-b5.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 28 Jun 2005 06:34:56 +0000 |
| parents | 11342f636d93 |
| children | e1784c56cee5 |
| files | leim/leim-ext.el |
| diffstat | 1 files changed, 6 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/leim/leim-ext.el Tue Jun 28 03:13:02 2005 +0000 +++ b/leim/leim-ext.el Tue Jun 28 06:34:56 2005 +0000 @@ -34,6 +34,12 @@ (eval-after-load "quail/PY-b5" '(quail-defrule "ling2" ?$(0!r(B nil t)) +;; Enable inputting full-width space (U+3000). +(eval-after-load "quail/Punct" + '(quail-defrule " " ?$A!!(B nil t)) +(eval-after-load "quail/Punct-b5" + '(quail-defrule " " ?$(0!!(B nil t)) + (autoload 'ucs-input-activate "quail/uni-input" "Activate UCS input method. With arg, activate UCS input method if and only if arg is positive.