use the symbol from the correct package

This commit is contained in:
szos 2022-06-26 11:05:52 +02:00
parent d0c05077ec
commit 3a785c9757

View file

@ -72,11 +72,11 @@
(when (> new-width w)
(setf w new-width)))
(multiple-value-bind (x y)
(stumpwm::calculate-gravity (message-window-stumpwm-screen frame)
(message-window-stumpwm-head frame)
stumpwm:*message-window-gravity*
w
h)
(calculate-gravity (message-window-stumpwm-screen frame)
(message-window-stumpwm-head frame)
stumpwm:*message-window-gravity*
w
h)
(move-and-resize-sheet (frame-top-level-sheet frame) x y w h))))))
(defmacro bold ((stream) &body body)