Lines Matching +defs:save +defs:point
41 (defmacro save-selected-window (&rest body)
55 `(let ((save-selected-window-window (selected-window))
56 ;; It is necessary to save all of these, because calling
59 (save-selected-window-alist
62 (save-current-buffer
65 (dolist (elt save-selected-window-alist)
69 (if (window-live-p save-selected-window-window)
70 (select-window save-selected-window-window))))))
144 (save-selected-window
432 (defcustom split-window-keep-point t
433 "*If non-nil, \\[split-window-vertically] keeps the original point \
436 If nil, adjust point in each of the two windows to minimize redisplay.
437 This is convenient on slow terminals, but point can move strangely.
441 point in both children."
452 If the variable `split-window-keep-point' is non-nil, both new windows
453 will get the same value of point as the current window. This is often
458 window is the one that the current value of point appears in. The
459 value of point can change if the text around point is hidden by the
462 Regardless of the value of `split-window-keep-point', the upper
467 (old-point (point))
473 (or split-window-keep-point
475 (save-excursion
479 (set-window-start new-w (point))
480 (if (> (point) (window-point new-w))
481 (set-window-point new-w (point)))
486 (setq bottom (point)))
488 (<= bottom (point))
489 (set-window-point old-w (1- bottom)))
491 (<= (window-start new-w) old-point)
493 (set-window-point new-w old-point)
495 (split-window-save-restore-data new-w old-w)))
500 (defun split-window-save-restore-data (new-w old-w)
524 (split-window-save-restore-data (split-window nil size t) old-w)))
546 (save-selected-window
567 (count-screen-lines (point-min) (point-max)
569 ;; counting height unless point is after it.
578 Optional arguments BEG and END default to `point-min' and `point-max'
593 (setq beg (point-min)))
595 (setq end (point-max)))
598 (save-excursion
599 (save-restriction
606 (goto-char (point-min))
640 (if (= (point-min) (point-max))
662 (set-window-point window (1- (window-point window))))
664 (save-selected-window
675 (save-excursion
676 (goto-char (point-max))
687 (point)))))
711 (pos-visible-in-window-p (point-min) window)
761 (save-selected-window
767 (save-selected-window