>>> "EB" == Emanuel Berg writes: > Uwe Brauer wrote: >> Thanks, so I did >> >> (defun my-add-subject-test2 () >> (interactive) >> (message-goto-subject) >> (message-bol) >> (insert "[Test]2 ")) >> >> (defun message-bol () >> (interactive) >> (let ((beg (point)) >> (end (progn (message-beginning-of-line) (point))) ) >> (when (= beg end) >> (forward-line 0) ))) >> >> But this did not work for an empty subject line, while >> Eric's suggestion does. > No one suggested it should be used like that either ... Then I did and still don't understand your earlier message about the purpose of this new function. Anyhow.