Re: new subject

[Clemens Schüller]

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