pestctrl/emacs-config
1
0
Fork 0
mirror of https://github.com/pestctrl/emacs-config.git synced 2026-06-14 04:11:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

Displaying on the left is too intrusive

Browse source 
Display on the bottom instead!
This commit is contained in:
Benson Chu 2024-04-09 08:48:51 -05:00
parent 7b475a5978
commit 3202725e01
2 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
config-ext.org
View file

@ -31,7 +31,11 @@
(let ((inhibit-read-only t)) (let ((inhibit-read-only t))
(if old (erase-buffer) (ednc-view-mode)) (if old (erase-buffer) (ednc-view-mode))
(insert (ednc-format-notification new t)) (insert (ednc-format-notification new t))
(my/display-buffer-in-side-window 'left (current-buffer))))))) (my/display-buffer-in-side-window
'bottom
(current-buffer)
nil
'(window-height . 6)))))))
(add-hook 'ednc-notification-presentation-functions (add-hook 'ednc-notification-presentation-functions
#'show-notification-in-buffer)) #'show-notification-in-buffer))
#+end_src #+end_src

5
lisp/side-window-split.el
View file

@ -51,7 +51,7 @@
`(prog1 ,place `(prog1 ,place
(setf ,place (1+ ,place)))) (setf ,place (1+ ,place))))
(defun my/display-buffer-in-side-window (side buffer-or-name &optional slot-override) (defun my/display-buffer-in-side-window (side buffer-or-name &optional slot-override &rest params)
(interactive (interactive
(list (my/emacs-read-side) (list (my/emacs-read-side)
(read-buffer-to-switch "Switch to buffer in side window: "))) (read-buffer-to-switch "Switch to buffer in side window: ")))
@ -65,7 +65,8 @@
`((side . ,side) `((side . ,side)
(slot . ,slot) (slot . ,slot)
(dedicated . t) (dedicated . t)
(window-parameters (no-delete-other-windows . t)))))) (window-parameters (no-delete-other-windows . t))
,@params))))
(defun my/find-file-side-window (side filename &optional slot-override) (defun my/find-file-side-window (side filename &optional slot-override)
(interactive (interactive