[Mew-dist 693] Problem of japanese Subject: undecoding.

[桐山和彦]

桐山％FreeBSD-portメンテナ です。

1.54 -> 1.55 へ FreeBSD の port(jp-mew-1.55:japanese/mew)をバージョン
アップしたんですが、 Subject: 欄の日本語の部分が化け化けに戻ってしまい
ました^^;

.mh_profile :
=============
Path:           Mail
postproc:       MH-postproc
file-coding:    ja_JP.jis7
display-coding: ja_JP.jis7
Draft-Folder:   drafts
rmmprocc:       /usr/local/bin/rmm
Msg-Protect:    600
Folder-Protect: 700
Draft-Protect:  600
automhnproc:    mhn
Aliasfile:      aliases
Signature:      桐山和彦
send:           -hencode
whom:           -hencode
show:           -showproc mhl
inc:            -form scan.form
scan:           -form scan.form

.emacs :
========
(setq mew-mail-domain-list
	  '("toba-cmt.ac.jp"))
      
(cond
 ((and window-system (string-match "^19" emacs-version))
  (setq hilit-mode-enable-list nil
		hilit-background-mode  'light
		hilit-inhibit-hooks    nil
		hilit-inhibit-rebinding nil)
  (require 'hilit19)
  ;;
  (add-hook 'mew-message-hook
			'hilit-rehighlight-buffer-quietly)
  (hilit-set-mode-patterns
   '(mew-message-mode)
   '(("^Subject:.*$" nil msg-subject)
	 ("^From:.*$" nil msg-from)
	 ("^X-.*:.*$" nil msg-quote)
	 ("^>.*$" nil msg-quote)
	 ("^[A-Za-z][A-Za-z0-9-]+:" nil msg-header)))
  ;;
  (add-hook 'mew-draft-mode-hook
			'hilit-rehighlight-buffer-quietly)
  (hilit-set-mode-patterns
   '(mew-draft-mode)
   '(("^Subject:.*$" nil msg-subject)
	 ("^From:.*$" nil msg-from)
	 ("^X-.*:.*$" nil msg-quote)
	 ("^>.*$" nil msg-quote)
	 ("^[A-Za-z][A-Za-z0-9-]+:" nil msg-header)))
  )
)
(setq mew-cite-fields '("Message-ID:" "From:"))
(setq mew-cite-format "Message-ID: %s の記事にて\n%s さんは書かれました :\n\n")
(setq mew-signature-insert-last t)
(add-hook 'mew-send-hook 'mew-draft-insert-signature)

scan.form :
===========
%4(msg)%<(cur)+%| %>%<{replied}-%|%<{encrypted}E%|\
%<(eq)%(trim{content-type})%<(amatch multipart)M%| %>%>%>%>\
%02(mon{date})/%02(mday{date})%<{date} %|*%>\
%<(mymbox{from})%<{to}To:%14(hdecode(friendly{to}))%>%>\
%<(zero)%17(hdecode(friendly{from}))%> \
%(hdecode{subject})%<{body}<<%{body}%>


MH-postproc :
=============
#!/bin/sh

while [ $# != 1 ]
do
	args="$args $1"
	shift
done

/usr/local/bin/nkf -e $1 >> $HOME/Mail/.mailpost
/usr/local/bin/nkf -j $1 > $HOME/Mail/lastpost
args="$args $HOME/Mail/lastpost"
/usr/local/lib/mh/post $args


です。info を覗いた限りでは scan.form は 1.54 -> 1.55 でも変更無いよう
なんですが...。

宜しくお願いします。
------------------------------------------------------------------------
桐山和彦 <kiri at example.com>                 鳥羽商船高等専門学校
                                                          電子機械工学科