Function: window--in-direction-2

window--in-direction-2 is a byte-compiled function defined in window.el.gz.

Signature

(window--in-direction-2 WINDOW POSN &optional HORIZONTAL)

Documentation

Support function for window-in-direction.

Source Code

;; Defined in /usr/src/emacs/lisp/window.el.gz
(defun window--in-direction-2 (window posn &optional horizontal)
  "Support function for `window-in-direction'."
  (if horizontal
      (let ((top (window-pixel-top window)))
	(if (> top posn)
	    (- top posn)
	  (- posn top (window-pixel-height window))))
    (let ((left (window-pixel-left window)))
      (if (> left posn)
	  (- left posn)
	(- posn left (window-pixel-width window))))))