From c846b2cea042ac3666d340305f46325cde68d674 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Wed, 18 Oct 2023 11:04:04 +1100 Subject: [emacs] Some minor fixes gnus: prefers plaintext my-buffer: fixes a bug my-org: fixing a local var --- emacs/.emacs.d/lisp/my/my-buffer.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'emacs/.emacs.d/lisp/my/my-buffer.el') diff --git a/emacs/.emacs.d/lisp/my/my-buffer.el b/emacs/.emacs.d/lisp/my/my-buffer.el index 2027b5d..ef988f8 100644 --- a/emacs/.emacs.d/lisp/my/my-buffer.el +++ b/emacs/.emacs.d/lisp/my/my-buffer.el @@ -48,7 +48,7 @@ (completing-read "Major mode: " (mapcar 'prin1-to-string (my-get-buffer-modes)))))) - (switch-to-buffer (my-read-buffer-by-mode))) + (switch-to-buffer (my-read-buffer-by-mode mode))) (defun my-read-buffer-by-mode (mode) (if (eq mode 'shell-mode) @@ -66,7 +66,7 @@ With a prefix-arg, prompt for major mode." (interactive "P") (if arg (call-interactively 'my-switch-to-buffer-matching-major-mode) - (switch-to-buffer (my-read-buffer-by-mode)))) + (switch-to-buffer (my-read-buffer-by-mode major-mode)))) (defun my-buffer-find-mode (mode) "Find a buffer of a given MODE not in a live window." -- cgit v1.2.3