diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2020-10-19 11:11:27 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-10-19 11:11:27 -0700 |
| commit | f2ea5e744ab5d65da8852806a23eb7fdb2cbe304 (patch) | |
| tree | 1e3b53f94e612999008c618d6a7a6eed1497ba92 | |
| parent | c86c5e12bdebfeb1461f3a5eb2d57b9c88f05c52 (diff) | |
| download | dotfiles-f2ea5e744ab5d65da8852806a23eb7fdb2cbe304.tar.gz | |
properly qualify cl- function
| -rw-r--r-- | .emacs.d/init-notmuch.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/.emacs.d/init-notmuch.el b/.emacs.d/init-notmuch.el index ef1590ee..e8fbdebb 100644 --- a/.emacs.d/init-notmuch.el +++ b/.emacs.d/init-notmuch.el @@ -178,7 +178,7 @@ Two ways to read: ;; to minimise what gets committed to ~/lib/nmbug-spw (defun spw/kill-thread () (interactive) - (case major-mode + (cl-case major-mode (notmuch-show-mode (notmuch-show-tag '("+spw::killed")) (notmuch-show-archive-thread-then-next)) @@ -193,7 +193,7 @@ Two ways to read: (defun spw/spam-message () (interactive) - (case major-mode + (cl-case major-mode (notmuch-show-mode (notmuch-show-tag '("-unread" "+spam")) (notmuch-show-archive-message-then-next-or-next-thread)) |