pestctrl/emacs-config
1
0
Fork 0
mirror of https://github.com/pestctrl/emacs-config.git synced 2026-02-16 16:24:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix floating windows and emacs startup

Browse source
This commit is contained in:
Benson Chu 2022-06-14 12:10:47 -05:00
parent 681ae1a5f4
commit ab444b4ba4
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/switch-tabs.el
View file

@ -132,8 +132,6 @@
(define-key *tab-map* (kbd "t") #'last-tab)
(define-key *tab-map* (kbd "j") #'tab-bar-jump)
(tab-bar-rename-tab "scratch1")
(defvar tab-switch-mode-map nil)
(unless tab-switch-mode-map
@ -150,7 +148,9 @@
(with-selected-frame frame
(let* ((tab (assq 'current-tab (frame-parameter frame 'tabs)))
(tab-explicit-name (alist-get 'explicit-name tab)))
(unless tab-explicit-name
(unless (or tab-explicit-name
(cdr (assoc 'unsplittable
(frame-parameters nil))))
(tab-bar-rename-tab "scratch")
(tab-bar-new-tab -1)
(tab-bar-rename-tab "emacs-devel")
@ -158,6 +158,9 @@
(tab-bar-rename-tab "org")
(switch-or-create-tab "scratch")))))
(add-hook 'emacs-startup-hook
#'(lambda () (init-tab-name (selected-frame))))
(add-hook 'after-make-frame-functions
#'init-tab-name)