[Mew-dist 05381] Re: 1.93b45
SAKAI Kiyotaka
ksakai at example.com
1998年 7月 6日 (月) 11:56:30 JST
>> In article <19980706112311B.takeuchi at example.com>, Takeuchi Tomoharu <takeuchi at example.com> writes:
euchi> 19.34base の Mule2.3,Wnn4 では駄目です.b44 の時から駄目に
takeuchi> なっています.
takeuchi> まあ,ほとんど Subject に日本語を入力しないので余り困らない
takeuchi> のですが,必要な時にも入力できないのでとっても困っています.
>> ためしていないので、はずしていたらゴメンナサイなのですが、.emacsに
>> (setq mew-use-overlay-keymap nil)
>> でうまくいくと思います。(see mew-env.el)
> 残念ながら駄目でした。setq する前と変わりませんでした。
この問題を解決するためのパッチです。
これで、19.34 でも (setq mew-use-overlay-keymap nil) が使えるようにな
ります。
--
酒井 清隆 (E-mail: ksakai at example.com)
-------------- next part --------------
Index: mew-syntax.el
===================================================================
RCS file: /home/cvsroot/mew-1.93b45/mew-syntax.el,v
retrieving revision 1.1.1.1
diff -u -r1.1.1.1 mew-syntax.el
--- mew-syntax.el 1998/07/06 01:10:16 1.1.1.1
+++ mew-syntax.el 1998/07/06 02:47:00
@@ -911,6 +911,7 @@
(defmacro mew-draft-header-keymap ()
(` (progn
+ (if mew-use-overlay-keymap
(if (mew-overlay-p mew-overlay-header-keymap)
(mew-overlay-move mew-overlay-header-keymap
(point-min) (mew-header-end))
@@ -918,10 +919,11 @@
(mew-overlay-make (point-min) (mew-header-end)))
(mew-overlay-put mew-overlay-header-keymap
(if mew-xemacs-p 'keymap 'local-map)
- mew-draft-header-map)))))
+ mew-draft-header-map))))))
(defmacro mew-draft-attach-keymap ()
(` (progn
+ (if mew-use-overlay-keymap
(if (mew-overlay-p mew-overlay-attach-keymap)
(mew-overlay-move mew-overlay-attach-keymap
(mew-attach-begin) (point-max))
@@ -929,7 +931,7 @@
(mew-overlay-make (mew-attach-begin) (point-max)))
(mew-overlay-put mew-overlay-attach-keymap
(if mew-xemacs-p 'keymap 'local-map)
- mew-draft-attach-map)))))
+ mew-draft-attach-map))))))
(provide 'mew-syntax)
Mew-dist メーリングリストの案内