]> git.donarmstrong.com Git - lib.git/commitdiff
prefer vertical splits
authorDon Armstrong <don@donarmstrong.com>
Sat, 29 Apr 2017 17:17:19 +0000 (10:17 -0700)
committerDon Armstrong <don@donarmstrong.com>
Sat, 29 Apr 2017 17:18:12 +0000 (10:18 -0700)
emacs_el/configuration/don-configuration.org

index fa87368ed5081af4d6eb35c96b14136a4bd7544d..d42d690e6891957993ccf861ca5ffbe5de984c66 100644 (file)
   (setq split-width-threshold  100)
   (setq split-height-threshold 60)
 
-  (defun my/split-window-prefer-horizontally (window)
+  (defun my/split-window-prefer-vertically (window)
     "If there's only one window (excluding any possibly active
            minibuffer), then split the current window horizontally."
     (if (and (one-window-p t)
              (not (active-minibuffer-window))
-             ( > (frame-width) (frame-height))
+             ( < (frame-width) (frame-height))
              )
-        (let ((split-height-threshold nil))
+        (let ((split-width-threshold nil))
           (split-window-sensibly window))
       (split-window-sensibly window)))
 
-  (setq split-window-preferred-function #'my/split-window-prefer-horizontally)
+  (setq split-window-preferred-function #'my/split-window-prefer-vertically)
   (setq window-combination-resize t)
 #+END_SRC