Gomuks for an element client

This commit is contained in:
Jakub 2025-09-24 16:22:58 +08:00
parent 98fd8f06f2
commit 32c64f3bba
3 changed files with 20 additions and 1 deletions

View file

@ -53,6 +53,24 @@
(switch-to-buffer "*Shell Session*")
(funcall (theurgy-shell) "*Shell Session*")))
(defun theurgy-gomuks ()
"Launch gomuks as it's own buffer."
(interactive)
(if (get-buffer "*Gomuks*")
(switch-to-buffer "*Gomuks*")
(funcall (theurgy-shell) "*Gomuks*")
(let ((buf (current-buffer)))
(vterm-send-string "gomuks")
(vterm-send-return)
(rename-buffer "Gomuks"))))
(defun theurgy-gomuks-workspace ()
"Launch gomuks as a workspace."
(interactive)
(theurgy-gomuks)
(tab-rename "Gomuks")
(tab-bar-change-tab-group "userland: gomuks"))
(define-key global-map (kbd "C-<return>") 'theurgy-main-shell)
(global-set-key (kbd "M-RET") 'theurgy-bottom-shell)