X-Git-Url: http://g0dil.de/git?a=blobdiff_plain;f=setup%2Fmywin.el;h=4fde816acaf86e2544452f50f42315a238b9311e;hb=a3cc80e69cdad940bd67c706e40f7f749291496a;hp=7d961c13004880c31b2ca69c80d5d5ec02d5798e;hpb=4ff4851e3bf7b5467c4783676d2793a4b04a589a;p=emacs-init.git diff --git a/setup/mywin.el b/setup/mywin.el index 7d961c1..4fde816 100644 --- a/setup/mywin.el +++ b/setup/mywin.el @@ -145,8 +145,7 @@ window smaller than MIN-HEIGHT lines." (not (member name setup-my-windows-precious-buffers))) return w) firstwindow)) (when (and distribute (> (length newtopwindows) 1)) - ;;(balance-windows) - ) + (pjb-balance-windows t)) (select-window newwindow) (if (not (member (buffer-name currentbuffer) setup-my-windows-junk-buffers)) (switch-to-buffer currentbuffer)))) @@ -216,5 +215,10 @@ the buffer stack in the current window." (error "Current window is not a top window")) (shrink-window-horizontally (- (- width (window-width) (* window-min-width (1- count))))))) -(global-set-key "\C-x=" 'safe-max-window-horizontally) +(defun safe-max-window () + (interactive) + (safe-max-window-horizontally) + (maximize-window 5)) + +(global-set-key "\C-x=" 'safe-max-window) (global-set-key "\C-x-" 'maximize-window-15)