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