diff options
| -rw-r--r-- | .emacs.d/early-init.el | 8 | ||||
| -rw-r--r-- | .emacs.d/rul-lisp/packages/rul-wm.el | 4 |
2 files changed, 9 insertions, 3 deletions
diff --git a/.emacs.d/early-init.el b/.emacs.d/early-init.el index a0eaedb..9be4302 100644 --- a/.emacs.d/early-init.el +++ b/.emacs.d/early-init.el @@ -10,10 +10,16 @@ ;; Mutter/X11 here and can leave a large blank strip at the bottom. (add-to-list 'default-frame-alist '(fullscreen . maximized)) +(defun rul-startup-terminals-frame () + "Give this frame its own tab bar, then open a terminal in it." + (set-frame-parameter nil 'tab-bar-lines 1) + (set-frame-parameter nil 'tab-bar-lines-keep-state t) + (multi-vterm)) + ;; Extend this list from to add more startup frames. (defvar rul-startup-frames '(("main" . nil) - ("terminals" . multi-vterm)) + ("terminals" . rul-startup-terminals-frame)) "Startup frame specifications. Each entry has the form (NAME . SETUP). NAME is the frame name. SETUP is an optional function or interactive command called in that frame.") diff --git a/.emacs.d/rul-lisp/packages/rul-wm.el b/.emacs.d/rul-lisp/packages/rul-wm.el index ba2aca8..2f86e0d 100644 --- a/.emacs.d/rul-lisp/packages/rul-wm.el +++ b/.emacs.d/rul-lisp/packages/rul-wm.el @@ -30,8 +30,8 @@ (setq tab-bar-close-button-show nil) (set-face-attribute 'tab-bar nil :height 0.8) -;; I've moved to a frame oriented workflow, so I no longer use tabs. -;; (tab-bar-mode 1) +;; Per frame tab-bar configuration +(setq tab-bar-show nil) ;; Pop-up buffers ;; Inspiration: https://protesilaos.com/codelog/2024-09-19-emacs-command-popup-frame-emacsclient/ |