/[emacs]/emacs/lisp/windmove.el
ViewVC logotype

Diff of /emacs/lisp/windmove.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5.2.1 by miles, Tue Oct 14 23:51:28 2003 UTC revision 1.5.2.2 by miles, Sat Sep 4 09:19:26 2004 UTC
# Line 429  the return value from `windmove-coordina Line 429  the return value from `windmove-coordina
429  regardless of the where point is in the buffer and where the window  regardless of the where point is in the buffer and where the window
430  is placed in the frame."  is placed in the frame."
431    (let* ((wind (if (null window) (selected-window) window))    (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  
432           (big-hairy-result (compute-motion           (big-hairy-result (compute-motion
433                              (window-start)                              (window-start)
434                              '(0 . 0)                              '(0 . 0)
435                              pos                              pos
436                              (cons usable-width usable-height)                              nil ; (window-width window-height)
437                              usable-width                              nil ; window-width
438                              (cons (window-hscroll)                              (cons (window-hscroll)
439                                    0)    ; why zero?                                    0)    ; why zero?
440                              wind)))                              wind)))

Legend:
Removed from v.1.5.2.1  
changed lines
  Added in v.1.5.2.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26