# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1119940496 0
# Node ID 8db64e24d5dc7caf8b54c692867476ec552bb354
# Parent  11342f636d93a112581e6e3f50ee76248e60dc4d
Add rules for inserting full-width space for
quail/Punct and quail/Punct-b5.

diff -r 11342f636d93 -r 8db64e24d5dc leim/leim-ext.el
--- 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.