add depth to notibox-show

This commit is contained in:
MitchMarq42 2023-08-11 19:39:03 -08:00
parent 878eb11346
commit 1dac237aac

View File

@ -88,11 +88,11 @@ If STACKDEPTH is non-nil and nonzero, return a position that far down."
;; (notibox--prepare-buffer "test" "this better work gadangit")
(defvar notibox-current-posframes nil)
(defun notibox--show (&optional timeout)
"Show the notibox currently prepared, with optional TIMEOUT."
(cl-defun notibox--show (&key timeout &key depth)
"Show the notibox currently prepared, with optional TIMEOUT, at DEPTH."
(add-to-list 'notibox-current-posframes
(posframe-show (get-buffer-create "*notibox*")
:position (notibox--get-position)
:position (notibox--get-position depth)
:left-fringe 0
:right-fringe 0
:max-width notibox-width