Function: mouse-avoidance-point-position

mouse-avoidance-point-position is a byte-compiled function defined in avoid.el.gz.

Signature

(mouse-avoidance-point-position)

Documentation

Return the position of point as (FRAME X . Y).

Analogous to mouse-position.

Source Code

;; Defined in /usr/src/emacs/lisp/avoid.el.gz
(defun mouse-avoidance-point-position ()
  "Return the position of point as (FRAME X . Y).
Analogous to `mouse-position'."
  (let* ((edges (window-inside-edges))
	 (posn-at-point (posn-at-point))
	 (x-y (and posn-at-point (posn-x-y posn-at-point))))
    (when x-y
      (cons (selected-frame)
	    (cons (+ (car edges)
		     (/ (car x-y) (frame-char-width)))
		  (+ (car (cdr edges))
		     (/ (cdr x-y) (frame-char-height))))))))