X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=emacs_el%2Fconfiguration%2Fdon-configuration.org;h=e4a061372f9e84f587ba46feaff6d4befa86b592;hb=14d487972ebe6dee67b8b15be8ab2ad98c552cc3;hp=fa87368ed5081af4d6eb35c96b14136a4bd7544d;hpb=a0862bd449c0e262daed11c1cda92cd156028a06;p=lib.git diff --git a/emacs_el/configuration/don-configuration.org b/emacs_el/configuration/don-configuration.org index fa87368..e4a0613 100644 --- a/emacs_el/configuration/don-configuration.org +++ b/emacs_el/configuration/don-configuration.org @@ -146,18 +146,18 @@ (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 @@ -285,6 +285,7 @@ value, scrolling continues until there is no more output. #+BEGIN_SRC emacs-lisp :tangle don-configuration.el (use-package magit :ensure t + :bind ("C-x g" . magit-status) :config ;; don't verify where we are pushing (setq magit-push-always-verify nil)