blob: e0f588a464ccdb9ed631aa186659c56fa2d3fb6f (
plain)
1
2
3
4
5
6
7
|
(defun init-display-buffer-frame-wide-p ()
(> (frame-pixel-width) (/ (x-display-pixel-width) 2)))
(defun init-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)))
|
