[Mew-dist 16325] news configuration

[Takeo OKAZAKI]

こんにちは，岡崎@琉球大学です。

環境をWindows2000に移行しようと思い，Meadow1.13b1を触り始めました。
mewも1.94.2から1.95へ移行して，メールのやりとりはうまくいきました。
newsは今までSemi-Gnus + mew-gnus.elを利用していたので，
MeadowについているNana-Gnus + mew-gnus.elにしようと思いました。
newsの購読は問題なかったのですが，投稿の際に，
  No Recipients !
と怒られました。つまり，To:フィールドがないというわけです。
そこで1.94.2に戻して(Meadow上で)実行したところ投稿できました。
しかし今度は，Data:フィールドがおかしいのです。
mailの際は +0900 (JST) となり，newsの際は +0900 となるべきところが
newsも +0900 (JST) のままです。
試しにmewを使わずにNana-Gnusだけで投稿したところ，
正しく +0900 となりました。

どなたか，お知恵をお貸し下さい。
.emacsのnews関係は次のようにしています。

(global-set-key		"g"	'gnus)
(autoload	'gnus	"gnus"	"Read network news."	t)
(autoload	'gnus-post-news	"gnuspost"	"Post a new news."	t)
(setq	gnus-select-method	'(nntp	"XXXXXXXX"))
(setq	message-syntax-checks	'((sender	.	disabled)))
(setq	gnus-interactive-exit	nil)
(setq	message-interactive	t)
(setq	gnus-read-active-file	t)
(setq	gnus-article-save-directory	"~/Mail/")
(setq	gnus-directory			"~/Mail/")
(add-hook	'gnus-group-mode-hook
	(function
	(lambda ()
	(require	'mew-gnus)
	(define-key	gnus-group-mode-map "a" 'mew-gnus-post-news))))
(add-hook	'gnus-summary-mode-hook
	(function
	(lambda ()
	(define-key	gnus-summary-mode-map "a" 'mew-gnus-post-news)
	(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-mail-reply-method		'gnus-mail-reply-using-mew)
(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)
(setq	mew-gnus-save-preserve-dot	nil)
(defun	mew-draft-newsgroup-comp ()
	(interactive)
	(let ((word (mew-delete-backward-char)))
		(if (null word)
		(tab-to-tab-stop)
		(mew-complete word gnus-active-hashtb "newsgroups" nil))))
(eval-after-load
	"mew"
	'(setq mew-field-completion-switch
		(append mew-field-completion-switch
			'(("Newsgroups:"  . mew-draft-newsgroup-comp)
			  ("Followup-To:" . mew-draft-newsgroup-comp)))))
(setq	gnus-subscribe-newsgroup-method
	(function	gnus-subscribe-hierarchically))
(setq	gnus-newsgroup-default-charset-alist
	'(	("^\\(japan\\|tnn\\|fj\\)\\."		.	iso-2022-jp-2)
		("^\\(ura\\|okinawa\\|kyushu\\)\\."	.	iso-2022-jp-2)))

---
 岡崎 威生
   琉球大学 工学部 情報工学科
   (okazaki at example.com)