* mu4e: replace mu4e-user-mail-address-regexp' and mu4e-my-mail-addresses' with `mu4e-user-mail-address-list'

This commit is contained in:
djcb
2012-10-19 16:01:55 +03:00
parent f0be196209
commit 6ccbd45b85
6 changed files with 59 additions and 36 deletions

View File

@ -81,25 +81,41 @@ the arguments may be `nil'."
:group 'mu4e
:safe 'stringp)
(defcustom mu4e-user-mail-address-regexp "$^"
"Regular expression matching the user's mail address(es). This is
used to distinguish ourselves from others, e.g. when replying and
in :from-or-to headers. By default, match nothing."
:type 'regexp
:group 'mu4e
:safe 'stringp)
;; (defcustom mu4e-user-mail-address-regexp "$^"
;; "Regular expression matching the user's mail address(es). This is
;; used to distinguish ourselves from others, e.g. when replying and
;; in :from-or-to headers. By default, match nothing."
;; :type 'regexp
;; :group 'mu4e
;; :safe 'stringp)
;; (defcustom mu4e-my-email-addresses `(,user-mail-address)
;; "List of e-mail addresses to consider 'my email addresses',
;; ie. addresses whose presence in an email imply that it is a
;; personal message. This is used when indexing messages."
;; :type '(repeat (string :tag "Address"))
;; :group 'mu4e)
(defcustom mu4e-user-mail-address-list `(,user-mail-address)
"List of e-mail addresses to consider 'my email addresses',
ie. addresses whose presence in an email imply that it is a
personal message. This is used when indexing messages."
:type '(repeat (string :tag "Address"))
:group 'mu4e)
;; don't use the older vars anymore
(make-obsolete-variable 'mu4e-user-mail-address-regexp
'mu4e-user-mail-address-list "0.9.9.x")
(make-obsolete-variable 'mu4e-my-email-addresses
'mu4e-user-mail-address-list "0.9.9.x")
(defcustom mu4e-use-fancy-chars nil
"Whether to use fancy (non-ascii) characters."
:type 'boolean
:group 'mu4e)
(defcustom mu4e-my-email-addresses `(,user-mail-address)
"List of e-mail addresses to consider 'my email addresses',
ie. addresses whose presence in an email imply that it is a
personal message. This is used when indexing messages."
:type '(repeat (string :tag "Address"))
:group 'mu4e)
(defvar mu4e-date-format-long "%c"
"Date format to use in the message view, in the format of