diff --git a/README.org b/README.org index 563a724..e181c84 100644 --- a/README.org +++ b/README.org @@ -19,7 +19,7 @@ Here is the complete list of other optional dependencies: - [[https://github.com/hunspell/hunspell][Hunspell]]: if Hunspell is installed, Theurgy will use it and a dictionary file in the =user-emacs-directory= to provide completions with both flyspell and ispell. The =theurgy-hunspell-dict= variable can be customized to select a different dictionary than the =en_AU.dict= used by default. Additionally, the =ispell-dictionary= and =ispell-local-dictionary-alist= variables should be customised accordingly to get rid of the =en_AU= locale. - =all-the-icons=: =all-the-icons= requires icons to be manually installed with =all-the-icons-install-fonts= at least once. - [[https://git.cyan.sh/BirDt/ouroboros-emacs-themes][Ouroboros Emacs Themes]]: Ouroboros themes depend on [[https://git.cyan.sh/BirDt/ouroboros-emacs-themes#headline-6][3 fonts]] to properly display. These themes are not automatically loaded, so you may choose to load any other theme. - +- [[https://github.com/gomuks/gomuks][gomuks]]: I've tried to provide some basic integration with Gomuks, as it is more usable for me than ement at the moment due to Pantalaimon not working properly. In addition, =git= is a _hard dependency_ that must be installed for Theurgy to work. diff --git a/screens/dashboard.el b/screens/dashboard.el index ab4341f..0ed0742 100644 --- a/screens/dashboard.el +++ b/screens/dashboard.el @@ -125,6 +125,7 @@ ("Dired" (dired "~") "d") ("RSS" elfeed "r") ("Terminal" theurgy-bottom-shell "t") + ("Gomuks" theurgy-gomuks-workspace "G") ("Weather" theurgy-show-weather "w"))))) :align center :width 20)) diff --git a/userland/terminal.el b/userland/terminal.el index c2d1377..8f703fc 100644 --- a/userland/terminal.el +++ b/userland/terminal.el @@ -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-") 'theurgy-main-shell) (global-set-key (kbd "M-RET") 'theurgy-bottom-shell)