[質問] X-Faceが表示され ない
[email protected] Wed, 09 Aug 2006 15:50:32 +0900
| Newsgroups | gmane.emacs.gnus.semi.japanese |
|---|---|
| Message-ID | <[email protected]> |
(Meadow-version)
"Meadow-3.00-dev (KIKU)"
(gnus-extended-version)
"Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.50 (windows-nt)"
* byte
(defconst x-face-e21-version "0.128")
X-face
x-face-ascii-view
X-Face(
)
[~/.mylisp/x-face.el]
; x-face-e21 load path
(cond
((eq window-system 'w32)
(progn
(add-to-list 'load-path "c:/winbin/Meadow/package/lisp")
)))
(autoload 'x-face-decode-message-header "x-face-e21")
(autoload 'x-face-insert "x-face-e21" nil t)
(autoload 'x-face-save "x-face-e21" nil t)
(autoload 'x-face-show "x-face-e21" nil t)
(autoload 'x-face-ascii-view "x-face-e21" nil t)
(autoload 'x-face-turn-off "x-face-e21")
[.emacs]
;;; for gnus is installed by myself
(load "~/.mylisp/x-face.el")
(setq load-path (cons (expand-file-name "~/mylisp/gnus-CURRENT-20060509/lisp") load-path))
(load "~/.mylisp/mml-attach-file.el") ; for attached on end of buffer
[.gnus]
; for x-face
(add-hook 'gnus-select-article-hook 'gnus-article-display-x-face)
...
(eval-after-load "gnus-sum"
'(progn
(define-key gnus-summary-mode-map "\C-x4s" 'x-face-save)
(define-key gnus-summary-mode-map "\C-x4a" 'x-face-ascii-view)))
...
;;; for x-face
(define-key message-mode-map "\C-x4i" 'x-face-insert)
(define-key message-mode-map "\M-t" 'x-face-show)
--
Takahiro Yamaguchi