[Mew-dist 15181] Re: patches

[NINOMIYA Hideyuki]

こんばんは	二宮@お四国 です

山本 和彦 様 は Tue, 28 Nov 2000 11:58:12 +0900 頃に
    Subject:    [Mew-dist 15161] patches
    Message-Id: <20001128.115812.74719033.kazu at example.com>
        に於いて以下のようにおっしゃっていました。
※都合により手を加えさせていただく事が有ります。御了承下さいマセヽ...
かず> いくつかのパッチを投げます。ミーティングに突入するので、
かず> その間に試されているといいなぁ。
かず> 
かず> - Message の "h" が ++thread に対してもきちんと動きます。
かず>   Summary でも "h" を定義しました。

ありがとうございます。今とっても幸せに ++inbox で暮らしています。
あと refile, delete, unlink なんかが出来るようになると、thread
folder に常駐して暮らせるようになりそうです。
そうなると、起動時にいきなり ++inbox を作成して飛んで行っても
良いんじゃないかと思っています。
そんな customize option を期待します。

以下は、現状に対する little patch です。
# virtual folder では reply, foword 等出来ないのかと思ってた。
## toolbar, menu 両方とも殺してあるもんだから、、、
## 'a' 出来てびっくり
virtual folder の toolbar と menu で reply 等を有効にします。
# refile 等の実装後は必要無い ?

Index: mew-key.el
===================================================================
RCS file: /tmp/am/da/cvs/mew/mew-key.el,v
retrieving revision 1.2
diff -c -r1.2 mew-key.el
*** mew-key.el	2000/11/28 09:26:50	1.2
--- mew-key.el	2000/11/28 07:23:34
***************
*** 174,183 ****
      ("Write/Reply/Forward"
       ["Write"               mew-summary-send   t]
       ["Reedit"              mew-summary-reedit t]
!      ["Reply"               mew-summary-reply  (mew-summary-case1)]
!      ["Reply with citation" mew-summary-reply-with-citation (mew-summary-case1)]
!      ["Forward"       mew-summary-forward       (mew-summary-case1)]
!      ["Multi forward" mew-summary-multi-forward (mew-summary-case1)]
       )
      ("Select"
       ["Search then Mark" mew-summary-search-mark (mew-summary-p)]
--- 174,183 ----
      ("Write/Reply/Forward"
       ["Write"               mew-summary-send   t]
       ["Reedit"              mew-summary-reedit t]
!      ["Reply"               mew-summary-reply  (mew-summary-case3)]
!      ["Reply with citation" mew-summary-reply-with-citation (mew-summary-case3)]
!      ["Forward"       mew-summary-forward       (mew-summary-case3)]
!      ["Multi forward" mew-summary-multi-forward (mew-summary-case3)]
       )
      ("Select"
       ["Search then Mark" mew-summary-search-mark (mew-summary-p)]
***************
*** 196,202 ****
       ["Toggle disp msg"      mew-summary-toggle-disp-msg  t]
       ["Set Config"           mew-summary-set-config       t]
       ["PGP public key fetch" mew-pgp-fetch-key            t]
!      ["Kill Sub-Process"     mew-summary-kill-subprocess (mew-summary-case3)]
       )))
  
  (defvar mew-summary-mode-toolbar-menu
--- 196,202 ----
       ["Toggle disp msg"      mew-summary-toggle-disp-msg  t]
       ["Set Config"           mew-summary-set-config       t]
       ["PGP public key fetch" mew-pgp-fetch-key            t]
!      ["Kill Sub-Process"     mew-summary-kill-subprocess (mew-summary-case4)]
       )))
  
  (defvar mew-summary-mode-toolbar-menu
Index: mew-summary.el
===================================================================
RCS file: /tmp/am/da/cvs/mew/mew-summary.el,v
retrieving revision 1.2
diff -c -r1.2 mew-summary.el
*** mew-summary.el	2000/11/28 09:26:51	1.2
--- mew-summary.el	2000/11/28 07:46:41
***************
*** 120,125 ****
--- 120,128 ----
    '(and (mew-summary-p) (not (mew-summary-queue-p))))
  
  (defmacro mew-summary-case3 ()
+   '(and (mew-summary-or-virtual-p) (not (mew-summary-draft-p))))
+ 
+ (defmacro mew-summary-case4 ()
    '(and (mew-summary-p) mew-summary-buffer-process))
  
  (defmacro mew-summary-only (&rest body)

---
ICQ UIN:57442553                          二宮 秀幸@愛媛 鬼北 広見町
PGP-Fingerprint:  6C59 EC08 5B23 6490 44D0  7CD3 DA40 219F 7114 8553
PGP-Public-Key:    http://user.shikoku.ne.jp/~nin/pgp/public-key.txt
mailto:nin at example.com   http://user.shikoku.ne.jp/~nin/index.html
mailto:nin at example.com http://home.jp.freebsd.org/~nin/index.html