[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 メーリングリストの案内