diff options
Diffstat (limited to 'config/display-buffer')
-rw-r--r-- | config/display-buffer/config-display-buffer-alist.el | 6 | ||||
-rw-r--r-- | config/display-buffer/config-display-buffer-best-side.el | 7 | ||||
-rw-r--r-- | config/display-buffer/config-display-buffer.el | 2 |
3 files changed, 8 insertions, 7 deletions
diff --git a/config/display-buffer/config-display-buffer-alist.el b/config/display-buffer/config-display-buffer-alist.el deleted file mode 100644 index e64f109..0000000 --- a/config/display-buffer/config-display-buffer-alist.el +++ /dev/null @@ -1,6 +0,0 @@ -(defvar config-display-buffer-gaps-width 20) - -(defun config-display-buffer-which-side () - (if (> (+ (frame-pixel-width) config-display-buffer-gaps-width) (/ (x-display-pixel-width) 2)) - 'right - 'bottom)) diff --git a/config/display-buffer/config-display-buffer-best-side.el b/config/display-buffer/config-display-buffer-best-side.el new file mode 100644 index 0000000..9a2ff48 --- /dev/null +++ b/config/display-buffer/config-display-buffer-best-side.el @@ -0,0 +1,7 @@ +(defun config-display-buffer-frame-wide-p () + (> (frame-pixel-width) (/ (x-display-pixel-width) 2))) + +(defun config-display-buffer-best-side (buffer alist) + (let* ((side (funcall (alist-get 'which-side alist))) + (alist (append (cdr alist) (list (cons 'side side))))) + (display-buffer-in-side-window buffer alist))) diff --git a/config/display-buffer/config-display-buffer.el b/config/display-buffer/config-display-buffer.el index c36d35f..022b1df 100644 --- a/config/display-buffer/config-display-buffer.el +++ b/config/display-buffer/config-display-buffer.el @@ -1,5 +1,5 @@ (setq display-buffer-base-action '(display-buffer-same-window display-buffer-reuse-window)) -(load "config-display-buffer-alist") +(load "config-display-buffer-best-side") (provide 'config-display-buffer) |