* Face ascent
@ 2004-02-10 9:24 Katsumi Yamaoka
2004-05-16 18:49 ` Lars Magne Ingebrigtsen
0 siblings, 1 reply; 4+ messages in thread
From: Katsumi Yamaoka @ 2004-02-10 9:24 UTC (permalink / raw)
Hi,
I'm using the following advice in order to let Gnus show Face
and X-Face images like XEmacs even in Emacs:
(defadvice gnus-create-image (before set-ascent-value
(file &optional type data-p &rest props)
activate)
"Set the value to the `:ascent' property of an image."
(if (and (not (featurep 'xemacs))
(boundp 'wash-face-p))
(setq props (plist-put props :ascent 80))))
Isn't there a request of wanting to install it in Gnus CVS? :)
--
Katsumi Yamaoka <yamaoka@jpl.org>
^ permalink raw reply [flat|nested] 4+ messages in thread* Re: Face ascent
2004-02-10 9:24 Face ascent Katsumi Yamaoka
@ 2004-05-16 18:49 ` Lars Magne Ingebrigtsen
2004-05-16 23:16 ` Katsumi Yamaoka
0 siblings, 1 reply; 4+ messages in thread
From: Lars Magne Ingebrigtsen @ 2004-05-16 18:49 UTC (permalink / raw)
Katsumi Yamaoka <yamaoka@jpl.org> writes:
> I'm using the following advice in order to let Gnus show Face
> and X-Face images like XEmacs even in Emacs:
>
> (defadvice gnus-create-image (before set-ascent-value
> (file &optional type data-p &rest props)
> activate)
> "Set the value to the `:ascent' property of an image."
> (if (and (not (featurep 'xemacs))
> (boundp 'wash-face-p))
> (setq props (plist-put props :ascent 80))))
>
> Isn't there a request of wanting to install it in Gnus CVS? :)
I think this should be installed...
--
(domestic pets only, the antidote for overdose, milk.)
larsi@gnus.org * Lars Magne Ingebrigtsen
^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: Face ascent
2004-05-16 18:49 ` Lars Magne Ingebrigtsen
@ 2004-05-16 23:16 ` Katsumi Yamaoka
2004-05-16 23:19 ` Lars Magne Ingebrigtsen
0 siblings, 1 reply; 4+ messages in thread
From: Katsumi Yamaoka @ 2004-05-16 23:16 UTC (permalink / raw)
>>>>> In <m31xlk3r9u.fsf@quimbies.gnus.org>
>>>>> Lars Magne Ingebrigtsen <larsi@gnus.org> wrote:
> Katsumi Yamaoka <yamaoka@jpl.org> writes:
>> I'm using the following advice in order to let Gnus show Face
>> and X-Face images like XEmacs even in Emacs:
>>
>> (defadvice gnus-create-image (before set-ascent-value
>> (file &optional type data-p &rest props)
>> activate)
>> "Set the value to the `:ascent' property of an image."
>> (if (and (not (featurep 'xemacs))
>> (boundp 'wash-face-p))
>> (setq props (plist-put props :ascent 80))))
>>
>> Isn't there a request of wanting to install it in Gnus CVS? :)
> I think this should be installed...
Thanks. It has already been installed as:
2004-02-12 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-fun.el (gnus-face-properties-alist): New user option.
(gnus-display-x-face-in-from): Use it.
* gnus-art.el (article-display-face): Ditto.
The manual for the gnus-face-properties-alist variable is in the
X-Face section.
--
Katsumi Yamaoka <yamaoka@jpl.org>
^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2004-05-16 23:19 UTC | newest]
Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-02-10 9:24 Face ascent Katsumi Yamaoka
2004-05-16 18:49 ` Lars Magne Ingebrigtsen
2004-05-16 23:16 ` Katsumi Yamaoka
2004-05-16 23:19 ` Lars Magne Ingebrigtsen
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).