* mu4e: mark the various views as 'special'

This commit is contained in:
djcb 2011-12-29 10:39:30 +02:00
parent e111cb488c
commit b01b70db05
3 changed files with 7 additions and 0 deletions

View File

@ -370,6 +370,10 @@ after the end of the search results."
field)
'face 'mu4e-title-face) " ")))
mu4e-headers-fields))))
(put 'mu4e-hdrs-mode 'mode-class 'special)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar mu4e-msg-map nil
"*internal* A map (hashtable) which maps a database (Xapian)

View File

@ -65,6 +65,7 @@
buffer-read-only t
overwrite-mode 'overwrite-mode-binary))
(put 'mu4e-main-mode 'mode-class 'special)
(defun mu4e-action-str (str &optional func-or-shortcut)

View File

@ -347,6 +347,8 @@ if IS-OPEN is nil, and otherwise open it."
(setq major-mode 'mu4e-view-mode mode-name mu4e-view-buffer-name)
(setq truncate-lines t buffer-read-only t))
(put 'mu4e-view-mode 'mode-class 'special)
;; we mark messages are as read when we leave the message; ie., when skipping to
;; the next/previous one, or leaving the view buffer altogether.