From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/64028 Path: news.gmane.org!not-for-mail From: Leo Newsgroups: gmane.emacs.gnus.general Subject: Re: Message mode Face and X-Face preview Date: Mon, 27 Nov 2006 01:01:47 +0000 Message-ID: References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1164590167 10957 80.91.229.2 (27 Nov 2006 01:16:07 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 27 Nov 2006 01:16:07 +0000 (UTC) Original-X-From: ding-owner+M12551@lists.math.uh.edu Mon Nov 27 02:16:04 2006 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by ciao.gmane.org with esmtp (Exim 4.43) id 1GoV6J-0006Hq-H9 for ding-account@gmane.org; Mon, 27 Nov 2006 02:16:03 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1GoV4v-0000Om-OX; Sun, 26 Nov 2006 19:14:37 -0600 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1GoUsv-0000L8-Ro for ding@lists.math.uh.edu; Sun, 26 Nov 2006 19:02:13 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtp (Exim 4.63) (envelope-from ) id 1GoUsp-0001gV-L5 for ding@lists.math.uh.edu; Sun, 26 Nov 2006 19:02:13 -0600 Original-Received: from main.gmane.org ([80.91.229.2] helo=ciao.gmane.org) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1GoUso-0005vk-00 for ; Mon, 27 Nov 2006 02:02:06 +0100 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1GoUsg-000390-Rh for ding@gnus.org; Mon, 27 Nov 2006 02:01:58 +0100 Original-Received: from sl392.st-edmunds.cam.ac.uk ([131.111.223.202]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 27 Nov 2006 02:01:58 +0100 Original-Received: from sdl.web by sl392.st-edmunds.cam.ac.uk with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 27 Nov 2006 02:01:58 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-To: ding@gnus.org Original-Lines: 34 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: sl392.st-edmunds.cam.ac.uk Face: iVBORw0KGgoAAAANSUhEUgAAAEAAAAAUCAMAAAAKqMsNAAAAwFBMVEUfIB4qLCk8PjxAQT9E RkNHSUZKS0lOUE1SVFFWV1VWWFVaW1lcXltfYV5kZWNpa2hsbmtub21vcW5ydHF3eXZ5e3h7fXp+ f32Agn+EhoOGiIWKjImNjouTlZKWmJWZm5icnpugop+jpaKnqaarraqwsq6ztbG4ure7vbq+wL3D xcLJy8jP0c3R09DT1dLV19TY2tfe4Nzf4d7h5ODj5eLn6ebq7Ont7+vv8e3y9PHz9fL19/T3+fb4 +/f8/vv+//wkcdDPAAAACXBIWXMAAAsTAAALEwEAmpwYAAAAB3RJTUUH1gIaAyMPYYdloAAAAZlJ REFUOMudVH9TgkAQxWhqGBrqSueSQM2QUgQERxKBt9//W3V3IJKZf7A33I+927ePtxwaESWrveip oD6mEW3m4LkYbr77AWAXZ/NFaDkD+3Hfi8H7IjR8PS90fPI+ALEF6JkRFrd4m10/nH1fAvBmlAxR OEx7+cCV6O10OnQuAODgfE4qACVvw7dVPaylhbVPnMDmnNFWiSiNRDult1M1+APbtses9Yf+b4Yz 7rxKEUlGdzcwTuqceiqyhq07k6eqQplcm8Bzpv15qSo/8DjP5XRlEXktM49L3AlTJjgWJtE40Cjw O7YnvLOhbjEWSwr3URSLeDwlhDK3DtKnCAh8lA8Evm40aE0tx6mciWloeKgFlI8pfe4Lk00wgFGQ WWro6t7oXWsgY1ithuo2vCmGSiSmEWNLqgHc1E1oXR0B5llbORwB8okddZIc91UVUHrYjWCeKLSl 79D6Ss/i630FkE6WLvPvgvOC/ALAn88UzWUi3BXgHyv3+kXAv7eRdgbIKHm07QkAjMJpAL6Mev6R BMJOFrpEH4AfGukf4kwTGH0AAAAASUVORK5CYII= User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/23.0.0 (gnu/linux) Cancel-Lock: sha1:v0ppmzgxyOZWkS5GjgqvpWjvfzg= X-Spam-Score: -2.6 (--) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:64028 Archived-At: On Friday, 24 Nov 2006, Reiner Steib wrote: > >> This seems like a nice feature, so I post it to this group. > > Personally I don't see much need for this, but maybe someone else want > to implement it. > > Bye, Reiner. I learned from article-display-face and made the following function. It seems to work fine for me. Any comments? (add-to-list 'message-hidden-headers "^Face:") (add-hook 'message-setup-hook 'sdl-message-display-face) (defun sdl-message-display-face () "Display any Face headers in the header." (interactive) (let (face png image) (save-restriction (mail-narrow-to-head) (setq face (mail-fetch-field "Face"))) (when face (when (setq png (gnus-convert-face-to-png face)) (setq image (gnus-create-image png 'png t)) (message-goto-from) (message-beginning-of-line) (backward-char) (gnus-add-image 'face image) (gnus-put-image image nil 'face))))) Thank you! -- Leo