Re: removing signatures when using supercite

[Katsumi Yamaoka <yamaoka@jpl.org>]

>>>>> Sebastian P. Luque wrote:
> On Wed, 09 Jun 2010 12:46:32 +0900,
> Katsumi Yamaoka <yamaoka@jpl.org> wrote:
[...]
>> I guess `sc-pre-hook' is what you look for.

> I've actually tried both this and `sc-post-hook', and something seems to
> clash, as I'm popped to a message composition buffer, with mark and
> point around the cited message, and then lines like the one below start
> flashing every second or so in the minibuffer (and stored in
> *Messages*):

> Mail header "> Hi Sebas..." doesn't conform to RFC 822. skipping...
> No mail headers found! Restoring old information.

Oops, I found the cause of this is that `message-remove-signature'
does the citation (i.e. remove headers, add '> ' to lines, etc.)
using the function `message-indent-citation'.  Hmm,
`message-remove-signature' may be the function for exclusive use
of a certain person.  Here's a workaround (it makes
`message-indent-citation' NOP temporarily):

(add-hook 'sc-pre-hook
	  (lambda ()
	    (let ((m-i-c (symbol-function 'message-indent-citation)))
	      (fset 'message-indent-citation 'ignore)
	      (unwind-protect
		  (message-remove-signature)
		(fset 'message-indent-citation m-i-c)))))