BirDt/theurgy
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge features into master #1

Merged
BirDt merged 5 commits from feature/projects into master 2025-08-20 18:20:14 +08:00
Conversation 0 Commits 5 Files changed 7 +10
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files
Showing only changes of commit 63a7d23507 - Show all commits

10
userland/terminal.el
View file

@ -33,12 +33,22 @@
'shell))
(defun theurgy-bottom-shell ()
"Put a shell in the bottom of the frame."
(interactive)
(let ((win (car (window-at-side-list nil 'bottom))))
(if (and win (equal 'bottom (window-parameter win 'window-side)))
(delete-window win)
(funcall (theurgy-shell)))))
(defun theurgy-main-shell ()
"Put a shell in a main window."
(interactive)
(if (get-buffer "*Shell Session*")
(switch-to-buffer "*Shell Session*")
(funcall (theurgy-shell) "*Shell Session*")))
(define-key global-map (kbd "C-<return>") 'theurgy-main-shell)
(global-set-key (kbd "M-RET") 'theurgy-bottom-shell)
(define-key vterm-mode-map (kbd "M-RET") 'theurgy-bottom-shell)