awesome-emacs/org-roam
1
0
Fork 0
mirror of https://github.com/org-roam/org-roam synced 2025-09-16 15:56:48 -05:00
Code Issues Packages Projects Releases Wiki Activity

(feat): add org-roam-buffer-window-parameters (#750)

Browse Source 
The variable `org-roam-buffer-window-parameters` gives more
flexibility in customizing the org-roam-buffer window parameters.
`org-roam-buffer-no-delete-other-windows` is deprecated in favour of
this.
This commit is contained in:
Jethro Kuan
2020-06-03 23:25:31 +08:00
committed by GitHub
parent d36d3185ae
commit 721689d5b5
3 changed files with 10 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
org-roam-buffer.el
View File

@@ -88,10 +88,10 @@ Has an effect if and only if `org-roam-buffer-position' is `top' or `bottom'."
:type 'hook
:group 'org-roam)
(defcustom org-roam-buffer-no-delete-other-windows nil
"The `no-delete-other-windows' parameter of the `org-roam-buffer' window.
When non-nil, the window will not be closed when deleting other windows."
:type 'boolean
(defcustom org-roam-buffer-window-parameters nil
"Additional window parameters for the `org-roam-buffer' side window.
For example: (setq org-roam-buffer-window-parameters '((no-other-window . t)))"
:type '(alist)
:group 'org-roam)
(defvar org-roam-buffer--current nil
@@ -251,17 +251,12 @@ Valid states are 'visible, 'exists and 'none."
(lwarn '(org-roam) :error
"Invalid org-roam-buffer-position: %s. Defaulting to \\='right"
org-roam-buffer-position))
'right))
(params
(list
(cons 'no-other-window org-roam-buffer-no-delete-other-windows)
(cons 'no-delete-other-windows org-roam-buffer-no-delete-other-windows))))
'right)))
(save-selected-window
(-> (get-buffer-create org-roam-buffer)
(display-buffer-in-side-window
(list
(cons 'side position)
(cons 'window-parameters params)))
`((side . ,position)
(window-parameters . org-roam-buffer-window-parameters)))
(select-window))
(pcase position
((or 'right 'left)