Hello!
On 25. Jän. 2015 at 20:58 Peter Münster wrote:
> On Sun, Jan 25 2015, incal wrote:
>>> Yeah, C-c C-f s ! ;)
>>
>> Indeed, however sometimes you reply to a post the old
>> way,
>
> Hi,
>
> What is the old way?
I have this in my .gnus and it works very well :-)
--8<---------------cut here---------------start------------->8---
(defun dpi-change-subject (neues-subject)
"introduces new subject."
(interactive "snew Subject: ")
(let ((case-fold-search nil))
(goto-line 0)
(re-search-forward "^Subject: ")
(if (re-search-forward "R[Ee]: " nil t)
(replace-match "")
)
(insert-string neues-subject)
(insert-string " (was: ")
(end-of-line)
(insert-string ")")
)
)
(define-key message-mode-map '[(meta n)] 'dpi-change-subject)
--8<---------------cut here---------------end--------------->8---
--
Best Regards, Clemens Schüller
_______________________________________________
info-gnus-english mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/info-gnus-english
