Actually make the calc trail window dedicated

* lisp/calc/calc.el (calc-trail-display): Actually make the trail
window dedicated (bug#45928).
This commit is contained in:
Lars Ingebrigtsen 2021-01-19 06:05:53 +01:00
parent 43982a8f10
commit 378a01e168

View file

@ -2144,7 +2144,7 @@ the United States."
(let ((w (split-window nil (/ (* (window-width) 2) 3) t)))
(set-window-buffer w calc-trail-buffer)
(and calc-make-windows-dedicated
(set-window-dedicated-p nil t))))
(set-window-dedicated-p w t))))
(calc-wrapper
(setq overlay-arrow-string calc-trail-overlay
overlay-arrow-position calc-trail-pointer)