[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Change ʽAT <date> <USER> wrote:ʼ
On Thu, 22 Jan 2015 18:48:26 +0000, John Morris wrote:
> ...which is bad English.
I absolutely agree. The bad English is very embarrassing.
> Presumably thereʼs some variable to customise, to change the string placed
> before the citation when doing reply-with-citation, but I canʼt find
> it....
AFAIK, there is no variable. The string is hard-coded in the definition of
wl-default-draft-cite which is in wl-draft.el. The workaround I use is to
put this into my .wl file:
(eval-after-load "wl-draft"
'(defun wl-default-draft-cite ()
(let ((mail-yank-ignored-headers "[^:]+:")
(mail-yank-prefix "> ")
date from cite-title)
(save-restriction
(if (< (mark t) (point))
(exchange-point-and-mark))
(narrow-to-region (point)(point-max))
(setq date (std11-field-body "date")
from (std11-field-body "from")))
(when (or date from)
(insert (format "On %s, %s wrote:\n" ;; <-- this line changed
(or date "some time ago")
(if wl-default-draft-cite-decorate-author
(funcall wl-summary-from-function
(or from "you"))
(or from "you")))))
(mail-indent-citation))))
It would be nice to change the date format, that is to have something like
"Thu, 22 Jan 2015 18:48" instead of "Thu, 22 Jan 2015 18:48:26 +0000", but I
haven't looked into how to do that. It really should be a variable.
Greg