From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/83758 Path: news.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.gnus.general Subject: Re: Posting styles and Faces Date: Thu, 05 Sep 2013 07:56:01 +0900 Organization: Emacsen advocacy group Message-ID: References: <877gew31mo.fsf@gmx.us> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1378335410 11645 80.91.229.3 (4 Sep 2013 22:56:50 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 4 Sep 2013 22:56:50 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M32014@lists.math.uh.edu Thu Sep 05 00:56:53 2013 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1VHM0J-0004lP-SQ for ding-account@gmane.org; Thu, 05 Sep 2013 00:56:52 +0200 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 1VHLzn-0008D4-If; Wed, 04 Sep 2013 17:56:19 -0500 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1VHLzk-0008Cs-UR for ding@lists.math.uh.edu; Wed, 04 Sep 2013 17:56:16 -0500 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx1.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.76) (envelope-from ) id 1VHLzj-0002o1-C8 for ding@lists.math.uh.edu; Wed, 04 Sep 2013 17:56:16 -0500 Original-Received: from mail-hampton.hostforweb.net ([216.246.15.223] helo=hampton.hostforweb.net) by quimby.gnus.org with esmtp (Exim 4.72) (envelope-from ) id 1VHLzh-0000RK-Hy for ding@gnus.org; Thu, 05 Sep 2013 00:56:13 +0200 Original-Received: from localhost.localdomain ([127.0.0.1]:33070 helo=localhost) by hampton.hostforweb.net with smtp (Exim 4.80.1) (envelope-from ) id 1VHLzZ-000JBy-3n for ding@gnus.org; Wed, 04 Sep 2013 17:56:06 -0500 X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( User-Agent: Gnus/5.130008 (=?iso-2022-jp?B?GyRCPz8bKEI=?= Gnus v0.8) Emacs/24.3.50 (i686-pc-cygwin) Cancel-Lock: sha1:36gGkFo7uHzLoqSEGoiX1Wk8nBQ= X-OutGoing-Spam-Status: No, score=-1.0 X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - hampton.hostforweb.net X-AntiAbuse: Original Domain - gnus.org X-AntiAbuse: Originator/Caller UID/GID - [47 12] / [47 12] X-AntiAbuse: Sender Address Domain - jpl.org X-Get-Message-Sender-Via: hampton.hostforweb.net: acl_c_authenticated_local_user: root X-Source: X-Source-Args: X-Source-Dir: X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:83758 Archived-At: Rasmus wrote: > I have noticed that I can't insert a (PNG Base64) Face with > gnus-posting-styles. Here's an example that can be evaluated in > emacs -q: #+BEGIN_SRC emacs-lisp (progn (require 'gnus-msg) (setq gnus-posting-styles '((".*" (name "Rasmus") (address "rasmus@gmx.us") (Face "FOO") (X-Face "FOO2") (-Face "BAR"))) gnus-select-method '(nnml "")) (add-to-list 'gnus-secondary-select-methods '(nntp "gmane" (nntp-address "news.gmane.org"))) (gnus) (gnus-group-mail)) #+END_SRC > Note that -Face is present, but neither Face nor X-Face is set. In that message buffer, what does the variable `message-setup-hook' get? (Try `C-h v message-setup-hook RET' in the message buffer.) What I got is as follows and there's nothing strange, i.e., I got those three face headers in the message buffer. That's a mystery. #v+ ((lambda nil (set (make-local-variable 'user-mail-address) "rasmus@gmx.us") (let ((user-full-name "Rasmus") (user-mail-address "rasmus@gmx.us")) (save-excursion (message-remove-header "From") (message-goto-eoh) (insert "From: " (message-make-from) "\n")))) (lambda nil (save-excursion (message-remove-header "X-Face") (let ((value "FOO2")) (when value (message-goto-eoh) (insert "X-Face" ": " value) (unless (bolp) (insert "\n")))))) (lambda nil (save-excursion (message-remove-header "Face") (let ((value "FOO")) (when value (message-goto-eoh) (insert "Face" ": " value) (unless (bolp) (insert "\n")))))) (lambda nil (save-excursion (message-remove-header "-Face") (let ((value "BAR")) (when value (message-goto-eoh) (insert "-Face" ": " value) (unless (bolp) (insert "\n")))))) t) #v-