Re: How to create/add-to-existing headers in a posting style?

2012-07-17 Thread Tassilo Horn
a...@koldfront.dk (Adam Sjøgren) writes:

 Another approach was to use gnus-parameters to add your
 append-hugo-in-cc function to message-header-hook (or
 message-header-setup-hook?) locally for this group.

 How do I add it locally? Ah, add-hook has a LOCAL parameter. Hm. Let's
 see if I can figure this out...

I think, there's no way to do it that way.  An existing variable in
group parameters will be automagically be made local in the
corresponding summary buffer.  So something like

 (my\.special\.group
   (message-setup-hook
 (append message-setup-hook
 (list (lambda () ...)

Probably, you can just use cons instead of append.  But I wan't sure if
your function maybe needs something that's setup by some other function
in message-setup-hook that needs to run earlier therefore.

 Which kind of works; the only problem with this is, that it leaves an
 empty header X-Add-To-Cc in the buffer, which is ugly - but I
 couldn't figure out how to have my function run without adding a
 header...

The above should omit this header creation.

Bye,
Tassilo


___
info-gnus-english mailing list
info-gnus-english@gnu.org
https://lists.gnu.org/mailman/listinfo/info-gnus-english


Re: How to create/add-to-existing headers in a posting style?

2012-07-17 Thread Tassilo Horn
Tassilo Horn tass...@member.fsf.org writes:

 I think, there's no way to do it that way.
  ^^^
Of course, that should have been there's no *need* to do it that way.

Bye,
Tassilo


___
info-gnus-english mailing list
info-gnus-english@gnu.org
https://lists.gnu.org/mailman/listinfo/info-gnus-english


Re: How to create/add-to-existing headers in a posting style?

2012-07-17 Thread Adam Sjøgren
On Tue, 17 Jul 2012 08:38:19 +0200, Tassilo wrote:

 An existing variable in group parameters will be automagically be made
 local in the corresponding summary buffer.

Hm, I can't make it work, though; I get this error in *Messages*:

  let: Symbol's value as variable is void: bbdb-insinuate-message

The value of message-setup-hook is (asjo-add-now-playing-header
bbdb-insinuate-message), which works fine.

Maybe I messed up the group parameters somehow...

  (message-setup-hook
   (append message-setup-hook
   (list
(lambda nil
  (save-excursion
(message-goto-cc)
(when
(not
 (string-match reallyreallyimport...@example.org
   (buffer-substring-no-properties
(line-beginning-position)
(line-end-position
  (when
  (not
   (=
(-
 (point)
 (line-beginning-position))
4))
(insert , ))
  (insert reallyreallyimport...@example.org)))


  Best regards,

 Adam

-- 
 Godnat og sov rigtigt godt eller, subsidiært, hop opAdam Sjøgren
  og ned og hav det rigtigt af helvede til. a...@koldfront.dk


___
info-gnus-english mailing list
info-gnus-english@gnu.org
https://lists.gnu.org/mailman/listinfo/info-gnus-english