(posn-col-row): Use let*.

diff --git a/lisp/subr.el b/lisp/subr.el
index c281a64843de3125bc9c460bfec5791255426571..6665bcd05f75829d089c8cbc435ce5931cca7183 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -437,9 +437,9 @@ corresponds to the vertical position of the click in the scroll bar."
                (car (nth 1 position)))
              'horizontal-scroll-bar)
          (cons (scroll-bar-scale pair (window-width window)) 0)
-       (let ((frame (if (framep window) window (window-frame window)))
-             (x (/ (car pair) (frame-char-width frame)))
-             (y (/ (cdr pair) (frame-char-height frame))))
+       (let* ((frame (if (framep window) window (window-frame window)))
+              (x (/ (car pair) (frame-char-width frame)))
+              (y (/ (cdr pair) (frame-char-height frame))))
          (cons x y))))))
 
 (defsubst posn-timestamp (position)