Lines Matching defs:visible
94 ;; visible area of the current buffer.
159 ;; Maximise the visible area of the current buffer,
387 ;; top-level menu visible when the mode is activated.
446 ;; When the mode is not activated, only one item is visible:
519 "The menu visible when Follow mode is active.")
522 "The menu visible when Follow mode is deactivated.")
662 the bottom window in the chain will be visible in the top window.
691 the top window in the chain will be visible in the bottom window.
883 If the end is not visible, it will be displayed in the last possible
893 ((follow-select-if-end-visible
1030 ;; ((Win Start End End-of-buffer-visible-p) ...)
1055 (defsubst follow-pos-visible (pos win win-start-end)
1056 "Non-nil when POS is visible in WIN."
1084 ;; Check if the point is visible in all windows. (So that
1087 (defun follow-point-visible-all-windows-p (win-start-end)
1088 "Non-nil when the window-point is visible in all windows."
1091 (setq res (follow-pos-visible (window-point (car (car win-start-end)))
1128 (defun follow-select-if-visible (dest win-start-end)
1129 "Select and return a window, if DEST is visible in it.
1136 (if (follow-pos-visible dest (car (car win-start-end)) win-start-end)
1152 (defun follow-select-if-end-visible (win-start-end)
1153 "Select and return a window, if end is visible in it."
1175 ;; as the point is not visible in any window.
1177 (defun follow-select-if-visible-from-first (dest windows)
1187 ;; Above the start, not visible.
1195 ;; Visible, if dest above end, or if eob is visible inside
1440 ;; This is due to the fact that the end can actaually be visible
1466 ;; cache the result for speed (i.e. `aligned' and `visible'.)
1473 (visible (follow-pos-visible dest win win-start-end)))
1474 (if (not (and aligned visible))
1483 ;; be visible in several windows.
1496 ((and visible
1504 ;; If the end is visible, and the window
1507 ((follow-select-if-end-visible win-start-end)
1508 (follow-debug-message "Max: end visible")
1509 (setq visible t)
1517 (setq visible nil)
1524 ((and visible aligned)
1531 ((follow-select-if-visible dest win-start-end)
1532 (follow-debug-message "visible")
1533 (setq visible t)
1535 ;; Not visible anywhere else, lets pick this one.
1537 (visible
1538 (follow-debug-message "visible in selected."))
1547 (setq visible t)
1552 ((follow-select-if-visible-from-first dest windows)
1554 (setq visible t)
1562 (setq visible nil)
1571 ;; Make sure the point is visible in the selected window.
1573 (if (or visible
1574 (follow-pos-visible dest win win-start-end))
1585 (not (inline (follow-point-visible-all-windows-p
1601 (if (follow-pos-visible dest win win-start-end)
1603 (follow-select-if-visible dest win-start-end)
1606 ;; If the region is visible, make it look good when spanning
2001 (follow-select-if-visible new-window-point
2007 ;; Stick to this window, if point is visible in it.
2008 ((pos-visible-in-window-p new-window-point)
2011 ;; point is visible at a window below,
2013 ((follow-select-if-visible-from-first
2025 ;; windows are aligned and the point is visible
2027 (if (and (not (follow-pos-visible
2072 ;; visible in any window in the resized frame, which is in follow-mode.
2139 ;; of text is visible.
2234 follow-pos-visible
2237 follow-select-if-visible
2238 follow-select-if-visible-from-first
2240 follow-point-visible-all-windows-p