From 1d624ccf86e9467ddcef5e3f26d072649ea87fc2 Mon Sep 17 00:00:00 2001 From: djcb Date: Thu, 15 Dec 2011 21:47:01 +0200 Subject: [PATCH] * update key bindings --- emacs/mu4e-hdrs.el | 2 +- emacs/mu4e-main.el | 14 +++++++------- emacs/mu4e-view.el | 6 +++--- 3 files changed, 11 insertions(+), 11 deletions(-) diff --git a/emacs/mu4e-hdrs.el b/emacs/mu4e-hdrs.el index c7f4a8ea..a75d9c7e 100644 --- a/emacs/mu4e-hdrs.el +++ b/emacs/mu4e-hdrs.el @@ -255,7 +255,7 @@ after the end of the search results." (define-key map "q" 'mu4e-quit-buffer) ;; (define-key map "o" 'mu4e-change-sort) - (define-key map "g" 'mu4e-rerun-search) + (define-key map "r" 'mu4e-rerun-search) ;; navigation (define-key map "n" 'mu4e-next-header) diff --git a/emacs/mu4e-main.el b/emacs/mu4e-main.el index b316bcbe..944faea1 100644 --- a/emacs/mu4e-main.el +++ b/emacs/mu4e-main.el @@ -38,17 +38,17 @@ (define-key map "b" 'mu4e-search-bookmark) (define-key map "s" 'mu4e-search) (define-key map "S" 'mu4e-search-full) - (define-key map "q" 'mu4e-quit-mm) + (define-key map "q" 'mu4e-quit) (define-key map "j" 'mu4e-jump-to-maildir) (define-key map "C" 'mu4e-compose-new) (define-key map "m" 'mu4e-toggle-mail-sending-mode) (define-key map "f" 'smtpmail-send-queued-mail) - (define-key map "u" 'mu4e-retrieve-mail-update-db) + (define-key map "U" 'mu4e-retrieve-mail-update-db) (define-key map "H" 'mu4e-display-manual) - map) + "Keymap for the *mu4e-main* buffer.") (fset 'mu4e-main-mode-map mu4e-main-mode-map) @@ -62,7 +62,7 @@ (setq mu4e-marks-map (make-hash-table :size 16 :rehash-size 2) major-mode 'mu4e-main-mode - mode-name "mu for emacs" + mode-name "mu4e" truncate-lines t buffer-read-only t overwrite-mode 'overwrite-mode-binary)) @@ -102,14 +102,14 @@ "\n" (propertize " Misc\n\n" 'face 'mu4e-title-face) - (mu4e-action-str "\t* [u]pdate email & database\n") + (mu4e-action-str "\t* [U]pdate email & database\n") (mu4e-action-str "\t* toggle [m]ail sending mode ") "(" (propertize (if smtpmail-queue-mail "queued" "direct") 'face 'mu4e-view-header-key-face) ")\n" (mu4e-action-str "\t* [f]lush queued mail\n") "\n" (mu4e-action-str "\t* [H]elp\n") - (mu4e-action-str "\t* [q]uit mm\n")) + (mu4e-action-str "\t* [q]uit\n")) (mu4e-main-mode) (switch-to-buffer buf)))) @@ -139,7 +139,7 @@ (info-display-manual "mu4e")) -(defun mu4e-quit-mm() +(defun mu4e-quit() "Quit the mm session." (interactive) (when (y-or-n-p "Are you sure you want to quit? ") diff --git a/emacs/mu4e-view.el b/emacs/mu4e-view.el index ef019363..4e50dccc 100644 --- a/emacs/mu4e-view.el +++ b/emacs/mu4e-view.el @@ -254,7 +254,7 @@ or if not available, :body-html converted to text)." (define-key map "w" 'mu4e-view-toggle-wrap-lines) (define-key map "h" 'mu4e-view-toggle-hide-cited) - (define-key map "R" 'mu4e-view-refresh) + (define-key map "r" 'mu4e-view-refresh) ;; next 3 only warn user when attempt in the message view (define-key map "u" 'mu4e-view-unmark) @@ -280,8 +280,8 @@ or if not available, :body-html converted to text)." '("View raw message" . mu4e-view-raw)) (define-key menumap [pipe] '("Pipe through shell" . mu4e-view-pipe)) - (define-key menumap [inspect] - '("Inspect with guile" . mu4e-inspect-message)) + ;; (define-key menumap [inspect] + ;; '("Inspect with guile" . mu4e-inspect-message)) (define-key menumap [sepa8] '("--")) (define-key menumap [open-att]