diff options
| -rw-r--r-- | lisp/windmove.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/windmove.el b/lisp/windmove.el index 7008b86335e..642f04a1d8d 100644 --- a/lisp/windmove.el +++ b/lisp/windmove.el | |||
| @@ -429,14 +429,12 @@ the return value from `windmove-coordinates-of-position' is (0 . 0) | |||
| 429 | regardless of the where point is in the buffer and where the window | 429 | regardless of the where point is in the buffer and where the window |
| 430 | is placed in the frame." | 430 | is placed in the frame." |
| 431 | (let* ((wind (if (null window) (selected-window) window)) | 431 | (let* ((wind (if (null window) (selected-window) window)) |
| 432 | (usable-width (1- (window-width wind))) ; 1- for cont. column | ||
| 433 | (usable-height (1- (window-height wind))) ; 1- for mode line | ||
| 434 | (big-hairy-result (compute-motion | 432 | (big-hairy-result (compute-motion |
| 435 | (window-start) | 433 | (window-start) |
| 436 | '(0 . 0) | 434 | '(0 . 0) |
| 437 | pos | 435 | pos |
| 438 | (cons usable-width usable-height) | 436 | nil ; (window-width window-height) |
| 439 | usable-width | 437 | nil ; window-width |
| 440 | (cons (window-hscroll) | 438 | (cons (window-hscroll) |
| 441 | 0) ; why zero? | 439 | 0) ; why zero? |
| 442 | wind))) | 440 | wind))) |