Mercurial > emacs

changeset 56587:c3fcca92bfd9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(windmove-coordinates-of-position): Let compute-motion calculate usable window width and height.
author Kim F. Storm <storm@cua.dk>
date Mon, 02 Aug 2004 15:20:05 +0000
parents 0731f4f165af
children 79a8fffd55e9
files lisp/windmove.el
diffstat 1 files changed, 2 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/windmove.el	Mon Aug 02 15:19:24 2004 +0000
+++ b/lisp/windmove.el	Mon Aug 02 15:20:05 2004 +0000
@@ -429,14 +429,12 @@
 regardless of the where point is in the buffer and where the window
 is placed in the frame."
   (let* ((wind (if (null window) (selected-window) window))
-         (usable-width (1- (window-width wind))) ; 1- for cont. column
-         (usable-height (1- (window-height wind))) ; 1- for mode line
          (big-hairy-result (compute-motion
                             (window-start)
                             '(0 . 0)
                             pos
-                            (cons usable-width usable-height)
-                            usable-width
+                            nil ; (window-width window-height)
+                            nil ; window-width
                             (cons (window-hscroll)
                                   0)    ; why zero?
                             wind)))