commit a7eeb53af689d1918842df9d83a698f7298512b1 parent 343bcff40d3ebc489653c4470de68707f3c1c73d Author: Yuval Langer <yuval.langer@gmail.com> Date: Sun, 28 Jul 2024 18:22:39 +0300 Add function starting and/or switching to a vterm running weechat. Diffstat:
| M | config/emacs/kakafarm-utils.el | | | 18 | +++++++++++++++++- |
1 file changed, 17 insertions(+), 1 deletion(-)
diff --git a/config/emacs/kakafarm-utils.el b/config/emacs/kakafarm-utils.el @@ -150,7 +150,8 @@ from https://www.youtube.com/watch?v=6R-73hsL5wk" (lambda (keyword) (and (kakafarm/org-roam-keyword-is-filetags-p keyword) (kakafarm/org-roam-filetags-keyword-is-publishable-p keyword))) - nil t))) + nil + t))) (defun kakafarm/org-roam-sitemap (title list-of-org-links) (message (format "kakafarm/org-roam-sitemap title: %S; list-of-links: %S\n" @@ -238,6 +239,21 @@ who-knows-where-and-who." (pulse-momentary-highlight-region (mark) (point)))) +(defun kakafarm/multi-vterm-weechat () + "Either start a weechat vterm buffer, or switch to it if it already exists." + + (interactive) + + (let* ((vterm-shell (expand-file-name "~/bin/w")) + (weechat-buffer-name "weechat") + (maybe-weechat-buffer (get-buffer "weechat"))) + (cond + ((multi-vterm-buffer-exist-p maybe-weechat-buffer) + (switch-to-buffer maybe-weechat-buffer)) + (t + (multi-vterm) + (rename-buffer weechat-buffer-name))))) + (defun kakafarm/sentence-end-double-nilify-for-read-only-buffers () "Set `sentence-end-double-space' in read-only buffer to `nil'." (when buffer-read-only