[Mew-dist 635] Re: mew-gnus (Re: 1.55)

ISOBE /磯部則和/ Norikazu isobe at example.com
1997年 3月 10日 (月) 18:59:01 JST


磯部@トライテックです。
いつもお世話になってます。(_o_)

=== 『"酒井" == <ksakai at example.com>』 さん(以降敬称略)が
=== 『Mon, 10 Mar 1997 17:48:27 +0900』 頃に書いた
=== 『[Mew-dist 632] Re: mew-gnus (Re: 1.55)』 について

>> R で引用してポストしようと思ったのですが、
>> The mark is not active now
>> というメッセージが出て引用出来なくなってしまいました。
>> 以前は出来ていたのですけれど....

酒井> 以前がどのバージョンを指すのかは分かりませんが、mew-gnus.el の使い方が

バージョン番号がないようなので、どう表現したらいいのか分かり
ませんが、ヘッダ部分が以下のような記述から始まるバージョンで
す。これだと今でも思ったように動きます。

;;
;; Temporary solution to link Mew to Gnus.
;; This code will be obsolated because Mew supports USENET news soon.
;;
;;  (add-hook 'gnus-summary-mode-hook '(lambda () (require 'mew-gnus)))
;;  (setq gnus-mail-reply-method 'gnus-mail-reply-using-mew)
;;
;; For GNUS 4.x User
;;  (setq gnus-mail-forward-method 'gnus-mail-forward-using-mew)
;;  (setq gnus-mail-other-window-method 'gnus-mail-other-window-using-mew)
;;  (setq gnus-default-article-saver 'gnus-summary-save-in-mew)
;;
;; For GNUS 5.x User
;;  (add-hook
;;   'gnus-summary-mode-hook
;;   (function
;;    (lambda ()
;;      (define-key gnus-summary-mode-map "r" 'mew-gnus-reply)
;;      (define-key gnus-summary-mode-map "R" 'mew-gnus-reply-with-citation)
;;      (define-key gnus-summary-mode-map "f" 'mew-gnus-mail-forward))))

(eval-when-compile 
  (progn
    (require 'gnus)))

酒井> key bind を上書きする方法に変更になりましたが、それは大丈夫でしょうか?

この意味がよく分からないのですが、Gnus の設定はこんな感じで
す。
Mew の設定の方が関係しますか?


;;; --- GNUS の設定(v5) -----------------------------------------
(global-set-key "\C-xg" 'gnus)          ;; Insert register
(autoload 'gnus "gnus" "Read network news." t)
(autoload 'gnus-post-news "gnuspost" "Post a news." t)
(setq gnus-default-nntp-server "XXX ")	;; ニューズサーバを指定してます。
(setq gnus-local-domain "tritech.co.jp")
(setq gnus-local-organization "triTech.Inc.,Tokyo,Japan. ")
(setq gnus-use-generic-from t)

(add-hook 'gnus-group-mode-hook
          '(lambda ()
             (require 'mew-gnus)
             (define-key gnus-group-mode-map "a" 'mew-send)
	     ))
(add-hook 'gnus-summary-mode-hook
          '(lambda ()
             (require 'mew-gnus)
             (define-key gnus-summary-mode-map "a" 'mew-send)
             (define-key gnus-summary-mode-map "r" 'mew-gnus-reply)
             (define-key gnus-summary-mode-map "R" 'mew-gnus-reply-with-citation)
             (define-key gnus-summary-mode-map "f" 'mew-gnus-mail-forward)
             (setq gnus-summary-line-format
                   "%U%R%z%I%(%[%4N\(%d\)%-20,20n%]%) %s\n")
             (setq gnus-visible-headers
                   "^From:\\|^Newsgroups:\\|^Subject:\\|^Date:\\|^Followup-To:\\|^Reply-To:\\|^Organization:\\|^Summary:\\|^Keywords:\\|^To:\\|^Cc:")
             (setq gnus-default-article-saver 'gnus-summary-save-in-mew)
             (setq gnus-thread-indent-level 2)
	     (setq gnus-thread-ignore-subject nil)
             ))
-----
磯部則和@(株)トライテック (^^ゞ
mailto:isobe at example.com



Mew-dist メーリングリストの案内