>>> "EB" == Emanuel Berg <moasenwood@zoho.eu> writes:

> Uwe Brauer wrote:
>> For example I expanded a mail alias that contains a lot of
>> addresses but I did this in the TO field not in the CC
>> field. Would be nifty if I could change it on the fly

> ;; is there really no function like this already?
> (defun message-set-header (hdr val)
>   (interactive "sheader: \nsvalue: ")
>   ;; check here if there _is_ such a header - how?
>   ;; also a must-have, super-simple building-block from the holster
>   ;; but can't find it either
>   (message-position-on-field hdr)
>   (message-beginning-of-line)
>   (delete-region (point) (point-at-eol))
>   (insert val) )
> ;; test: 
> ;; (message-set-header "Subject" "Lara loves YOU")

> (defun message-transpose-headers (hdr1 hdr2)
>   (interactive "sheader 1: \nsheader 2: ")
>   (let ((v1 (message-field-value hdr1))
>         (v2 (message-field-value hdr2)))
>     (message-set-header hdr1 v2)
>     (message-set-header hdr2 v1) ))
> ;; test:
> ;; (message-transpose-headers "To" "Subject")

Thanks that looks cool but as far as I can tell this is not part of
vanilla gnus (using GNU emacs master "84ec57fe06e187f41a3546131d5dae3b185c3511"

Uwe