tim.mccarthy/dotfiles
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Zooming for popper windows

Browse Source
This commit is contained in:
Tim McCarthy
2024-09-26 22:20:20 -07:00
parent dc5527e594
commit a9cb653949
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
thoom-emacs/init.el
View File

@@ -450,9 +450,10 @@
(defun thoom/zoom-window () (defun thoom/zoom-window ()
"Delete other windows, or restore the saved window configuration if available." "Delete other windows, or restore the saved window configuration if available."
(interactive) (interactive)
;; Clean up if the saved config isn't valid anymore.
(if (and thoom/zoom-saved-windows (if (and thoom/zoom-saved-windows
(not (window-configuration-p thoom/zoom-saved-windows))) (not (window-configuration-p thoom/zoom-saved-windows)))
;; Clean up if the saved config isn't valid anymore.
(setq thoom/zoom-saved-windows nil)) (setq thoom/zoom-saved-windows nil))
(if thoom/zoom-saved-windows (if thoom/zoom-saved-windows
@@ -460,7 +461,9 @@
(set-window-configuration thoom/zoom-saved-windows) (set-window-configuration thoom/zoom-saved-windows)
(setq thoom/zoom-saved-windows nil)) (setq thoom/zoom-saved-windows nil))
(setq thoom/zoom-saved-windows (current-window-configuration)) (setq thoom/zoom-saved-windows (current-window-configuration))
(delete-other-windows))) (if (window-parameter (selected-window) 'window-side)
(shrink-window -100)
(delete-other-windows))))
;;; Dired ;;; Dired
(use-package dired (use-package dired