Wanderlust のテンプレート
の message 版です。
以下のような感じで利用できます。
No Gnus を X 上の Emacs-22.0.50 で利用していると、Drag & Drop でファイルを 添付できますが、Meadow / NTEmacs を利用している場合も以下の設定で できます。(NTEmacs の方は未確認ですが。)
(when (eq window-system 'w32)
(defun mml-w32-dnd-attach-file (event)
"Attach a drag and drop file."
(interactive "e")
(if (eq (posn-window (event-start event)) (selected-window))
(dolist (file (car (cdr (cdr event))))
(when (file-regular-p file)
(let* ((type (mml-minibuffer-read-type file))
(description (mml-minibuffer-read-description))
(disposition (mml-minibuffer-read-disposition type)))
(mml-attach-file file type description disposition))))
(w32-drag-n-drop event)))
(eval-after-load "mml"
'(define-key mml-mode-map [drag-n-drop] 'mml-w32-dnd-attach-file)))
(2003/Dec/8 gnus-summary-x-face.el を修正)
Emacs-21 + x-face-e21 を用いて、Summary に X-Face を表示します。 (サンプル)
gnus-summary-x-face.el を 読み込むと、gnus-summary-line-format に "%ux" と指定した箇所に x-face が 表示されます。