Function: follow-windows-aligned-p

follow-windows-aligned-p is a byte-compiled function defined in follow.el.gz.

Signature

(follow-windows-aligned-p WIN-START-END)

Documentation

Non-nil if the follower windows are aligned.

The argument, WIN-START-END, should be a list of the form returned by follow-windows-start-end.

Source Code

;; Defined in /usr/src/emacs/lisp/follow.el.gz
;; By `aligned' we mean that for all adjacent windows, the end of the
;; first is equal with the start of the successor.  The first window
;; should start at a full screen line.

(defsubst follow-windows-aligned-p (win-start-end)
  "Non-nil if the follower windows are aligned.
The argument, WIN-START-END, should be a list of the form
returned by `follow-windows-start-end'."
  (let ((result t))
    (while (and win-start-end result)
      (if (cdr win-start-end)
	  (setq result (eq (nth 2 (car win-start-end))
			   (nth 1 (cadr win-start-end)))))
      (setq win-start-end (cdr win-start-end)))
    result))