[mew-dist 22860] 南京錠 (was: stunnel)

[Hideyuki SHIRAI ( 白井秀行 )]

From: Kazu Yamamoto (山本和彦) <kazu at example.com> さん曰く
Subject: [mew-dist 22853] stunnel
Message-ID: <20030114.221258.68537861.kazu at example.com>
Date: Tue, 14 Jan 2003 22:12:58 +0900 (JST)

> (2) Emacs 21 だと、POP/IMAP/NNTP(読む方)に SSL/SSH を使うと南京錠がモー
> ドラインに現れます。SMTP/NNTP(書く方)では、log に "SSL" と記録が残りま
> す。

> Emacs 21 では、mode-line-process にイメージをセットしてもイメージが表
> 示されないというバグ(仕様)があるので、mode-line-format にセットしてい
> ます。バグはレポートしましたので、バグが直ったら、mode-line-process の
> 方へ移します。

ということは、Emacs 21 以外では mode-line-process で Secure だよっ
て出せるし、Emacs 21 も -nw があるし、

(unless (and (= emacs-major-version 21)
	     (not (featurep 'xemacs))
	     window-system)
  (let ((xbmfile (expand-file-name "~/icons/Private.xbm"))) ;; mhc の icon
    (if (and window-system
	     (or (featurep 'bitmap)
		 (locate-library "bitmap"))
	     (file-exists-p xbmfile))
      (progn
	(require 'bitmap)
	(setq mew-secure-format2
	      (concat " "
		      (with-temp-buffer
			(bitmap-insert-xbm-file xbmfile)
			(goto-char (point-min))
			(buffer-substring (point) (line-end-position))))))
      (setq mew-secure-format2 " [Sec]"))
    (setq mew-mode-line-process
	  '((mew-summary-buffer-process mew-summary-buffer-process-status)
	    (mew-summary-buffer-secure-process mew-secure-format2)))))

したら幸せ。

-- 
白井秀行 (mailto:shirai at example.com)