Adding X-Face-headers

Adding X-Face-headers

[Adam Sjoegren]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 854 bytes --]

For fun I just made an X-Face. I manually had to escape the
quotation-marks and backslashes in the X-Face:-string to be able to
add it via "message-default-headers".

Is that the easiest way to do it?

It seems a little bit messy to me - and since I'm nowhere near
mastering (e)lisp, I can't tell if there's an easier solution..


This is what I have added to my ~/.gnus:

= = =
(setq message-default-headers '"X-Face: I}xi'7amUt@!6G8xA4tHs\"YqVIC8+J)3Z0egC3VY8E\"WwG]XwI')t=2l2T:'*/8zXh,/Nb-
 q!I8r>i%Rmv,JkMjx/DRL&~8A9bO>+AUyT/1gn6*VoV5?;[@UU|qwl$0}AA74{#%*ai~9RWQ7b_KZg
 pQt?_LZ4@/g^(7B+:Lmt)c8H*E*8va%qyM_m[6n\\V8}EtB`]qTFAUCvz4~\"~s:7dw
")
= = =

(I had to escape two "'s and one \).


  Best regards,

    Adam.

-- 
 But if you hurt whats mine                         Adam Sjøgren
 I'll sure as hell retaliate                        asjo@diku.dk

Re: Adding X-Face-headers

[Hrvoje Niksic]

Adam Sjoegren <asjo@diku.dk> writes:

> Is that the easiest way to do it?
> 
> It seems a little bit messy to me - and since I'm nowhere near
> mastering (e)lisp, I can't tell if there's an easier solution..

Yes, there is.  You can put the x-face adding to message-send-hook,
and read it from a file.  For instance:

(add-hook 'message-send-hook
          (lambda ()
            (goto-char (point-min))
            (insert "~/.x-face")))

...and keep your x-face in ~/.x-face, unescaped.

-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
Contrary to popular belief, Unix is user friendly.  
It just happens to be selective about who it makes friends with.

Re: Adding X-Face-headers

[Adam Sjoegren]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 455 bytes --]

>>>>> "Hrvoje" == Hrvoje Niksic <hniksic@srce.hr> writes:

 Hrvoje> (add-hook 'message-send-hook
 Hrvoje>    (lambda ()
 Hrvoje>       (goto-char (point-min))
 Hrvoje>       (insert "~/.x-face")))

I find that (insert-file ...) does the trick better (it had me stymied
for a while) :-)

Thanks for the tip!


   /Adam.

-- 
 But if you hurt whats mine                         Adam Sjøgren
 I'll sure as hell retaliate                        asjo@diku.dk