diff --git a/mu4e/mu4e-main.el b/mu4e/mu4e-main.el index 7e4b756d..db2abd3b 100644 --- a/mu4e/mu4e-main.el +++ b/mu4e/mu4e-main.el @@ -32,13 +32,19 @@ ;;; Mode -(defvar mu4e-main-buffer-hide-personal-addresses nil +(define-obsolete-variable-alias + 'mu4e-main-buffer-hide-personal-addresses + 'mu4e-main-hide-personal-addresses "1.5.7") + +(defvar mu4e-main-hide-personal-addresses nil "Whether to hide the personal address in the main view. This can be useful to avoid the noise when there are many. This also hides the warning if your `user-mail-address' is not part of the personal addresses.") + + (defvar mu4e-main-hide-fully-read nil "When set to t, do not hide bookmarks or maildirs that have no unread messages.") @@ -271,10 +277,10 @@ When REFRESH is non nil refresh infos from server." (mu4e~key-val "maildir" (mu4e-root-maildir)) (mu4e~key-val "in store" (format "%d" (plist-get mu4e~server-props :doccount)) "messages") - (if mu4e-main-buffer-hide-personal-addresses "" + (if mu4e-main-hide-personal-addresses "" (mu4e~key-val "personal addresses" (if addrs (mapconcat #'identity addrs ", " ) "none")))) - (if mu4e-main-buffer-hide-personal-addresses "" + (if mu4e-main-hide-personal-addresses "" (unless (mu4e-personal-address-p user-mail-address) (mu4e-message (concat "Tip: `user-mail-address' ('%s') is not part " @@ -318,8 +324,8 @@ When REFRESH is non nil refresh infos from server." (let ((buf (get-buffer-create mu4e-main-buffer-name))) (if (eq mu4e-split-view 'single-window) (if (buffer-live-p (mu4e-get-headers-buffer)) - (switch-to-buffer (mu4e-get-headers-buffer)) - (mu4e~main-menu)) + (switch-to-buffer (mu4e-get-headers-buffer)) + (mu4e~main-menu)) ;; `mu4e~main-view' is called from `mu4e~start', so don't call it ;; a second time here i.e. do not refresh unless specified ;; explicitly with REFRESH arg.