info-gnus-english
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Face - problem!!


From: Rebecca Ore
Subject: Re: Face - problem!!
Date: Thu, 31 Mar 2005 22:16:40 GMT
User-agent: Gnus/5.1006 (Gnus v5.10.6) XEmacs/21.4 (Jumbo Shrimp, darwin)

Surendra Singhi <address@hidden> writes:

>
> You also need to give me the code for the function
> my-message-header-setup-hook.

The sections in my .gnus.el that I've cobbled together
script-kitty-wise from other people's lisp suggestions are as follows:


  (defun my-message-header-setup-hook ()
            (let ((group (or gnus-newsgroup-name "")))
              (when (or (message-fetch-field "newsgroups")
                        (gnus-group-find-parameter group 'to-address)
                        (gnus-group-find-parameter group 'to-list))
                (insert "Mail-Copies-To: never\n"))))

(setq message-required-news-headers
  (append message-required-news-headers
    (list (cons 'Face (lambda ()
                        (gnus-face-from-file 
"~/Graphics/Photographs/smallberniesiguana.jpg"))))))

          
          (add-hook 'message-header-setup-hook
                    'my-message-header-setup-hook)



-- 
Rebecca Ore


reply via email to

[Prev in Thread] Current Thread [Next in Thread]