diff options
Diffstat (limited to 'attic')
| -rw-r--r-- | attic/misc.org | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/attic/misc.org b/attic/misc.org index be5ae99..74667ad 100644 --- a/attic/misc.org +++ b/attic/misc.org @@ -1133,26 +1133,6 @@ ;; (spam-initialize) #+end_src -*** notmuch -> gnus - #+begin_src emacs-lisp - (defun jao-notmuch-goto-message-in-gnus () - "Open a summary buffer containing the current notmuch article." - (interactive) - (let ((group (jao-maildir-file-to-group (notmuch-show-get-filename) - mail-source-directory)) - (message-id (replace-regexp-in-string "^id:" - "" - (notmuch-show-get-message-id)))) - (if (and group message-id) - (org-gnus-follow-link group message-id) - (message "Couldn't get relevant infos for switching to Gnus.")))) - - (defalias 'jao-open-gnus-frame 'jao-afio--goto-mail) - - (eval-after-load "notmuch-show" - '(define-key notmuch-show-mode-map (kbd "C-c C-c") - #'jao-notmuch-goto-message-in-gnus)) - #+end_src * snippets #+begin_src emacs-lisp (defun jao-minibuffer--text-with-padding (text) |