From 2c4d92d30f65860604e4a240edbc109198cfb767 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 3 Dec 2022 22:09:16 +0200 Subject: ; * lisp/subr.el (posn-col-row): Revert inadvertent change. --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/subr.el b/lisp/subr.el index dc219a49a74..21f43092d42 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1729,7 +1729,7 @@ and `event-end' functions." ((eq area 'horizontal-scroll-bar) (cons (scroll-bar-scale pair (window-width window)) 0)) (t - (if (and (windowp frame-or-window) use-window) + (if use-window (cons (/ (car pair) (window-font-width window)) (/ (cdr pair) (window-font-height window))) ;; FIXME: This should take line-spacing properties on -- cgit v1.2.3