diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2020-11-16 22:28:25 +0100 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2020-12-06 16:18:34 -0400 |
| commit | dfd99c7fba16d787cad7f8a6c39d66310b1af909 (patch) | |
| tree | 1c2b64be7ab6c0bcebddb312990ba51809d487f3 /emacs/notmuch-hello.el | |
| parent | ff80122972c3ab9882654a0d75698c6692007e15 (diff) | |
emacs: sanitize function that displays version
Previously it was defined in "notmuch-hello.el" and its name contained
"hello" solely because it replaced an anonymous function that was
mistakenly only bound in `notmuch-hello-mode-map'. But it makes more
sense to bind it in all notmuch modes and even if we did not change
that aspect it still would make no sense to have "hello" in its name.
Diffstat (limited to 'emacs/notmuch-hello.el')
| -rw-r--r-- | emacs/notmuch-hello.el | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index af170dd4..69d0ad64 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -652,26 +652,12 @@ with `notmuch-hello-query-counts'." (remove-hook 'window-configuration-change-hook #'notmuch-hello-window-configuration-change)))) -;; the following variable is defined as being defconst in notmuch-version.el -(defvar notmuch-emacs-version) - -(defun notmuch-hello-versions () - "Display the notmuch version(s)." - (interactive) - (let ((notmuch-cli-version (notmuch-cli-version))) - (message "notmuch version %s" - (if (string= notmuch-emacs-version notmuch-cli-version) - notmuch-cli-version - (concat notmuch-cli-version - " (emacs mua version " notmuch-emacs-version ")"))))) - (defvar notmuch-hello-mode-map ;; Inherit both widget-keymap and notmuch-common-keymap. We have ;; to use make-sparse-keymap to force this to be a new keymap (so ;; that when we modify map it does not modify widget-keymap). (let ((map (make-composed-keymap (list (make-sparse-keymap) widget-keymap)))) (set-keymap-parent map notmuch-common-keymap) - (define-key map "v" 'notmuch-hello-versions) (define-key map (kbd "<C-tab>") 'widget-backward) map) "Keymap for \"notmuch hello\" buffers.") |
