Re: Insert message-insert-disposition-notification-to in Posting Styles

[Damien Wyart]

> Hey, how you can change the "reply phrase", I mean this:
> * someusernamehere <someusernameh...@gmail.com> in gnu.emacs.gnus:

My function to handle this is a bit complicated. Here it is as an
example, you might need to learn a bit more of Gnus and Emacs Lisp to
fully understand it.

(defun dw-message-insert-citation-line ()
  "Function that inserts a simple citation line."
  (when message-reply-headers
    (cond
     ((string-match "nnml:mail" gnus-newsgroup-name)
      (insert "* "
              (mail-header-from message-reply-headers)
              " ["
              (format-time-string "%y%m%d %H:%M"
                                  (gnus-date-get-time
                                   (mail-header-date message-reply-headers)))
              "]:\n\n"))
     ((gnus-news-group-p gnus-newsgroup-name)
      (insert "* "
              (mail-header-from message-reply-headers)
              " in "
              gnus-newsgroup-name
              ":\n\n")))))

(setq message-citation-line-function 'dw-message-insert-citation-line)

-- 
DW