diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/frame.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 05db8cf6fd4..02871e0551d 100644 --- a/lisp/frame.el +++ b/lisp/frame.el | |||
| @@ -1465,6 +1465,7 @@ position (0, 0) of the selected frame's terminal." | |||
| 1465 | (t | 1465 | (t |
| 1466 | (cons 0 0))))) | 1466 | (cons 0 0))))) |
| 1467 | 1467 | ||
| 1468 | (declare-function ns-set-mouse-absolute-pixel-position "nsfns.m" (x y)) | ||
| 1468 | (declare-function w32-set-mouse-absolute-pixel-position "w32fns.c" (x y)) | 1469 | (declare-function w32-set-mouse-absolute-pixel-position "w32fns.c" (x y)) |
| 1469 | (declare-function x-set-mouse-absolute-pixel-position "xfns.c" (x y)) | 1470 | (declare-function x-set-mouse-absolute-pixel-position "xfns.c" (x y)) |
| 1470 | 1471 | ||
| @@ -1474,6 +1475,8 @@ The coordinates X and Y are interpreted in pixels relative to a | |||
| 1474 | position (0, 0) of the selected frame's terminal." | 1475 | position (0, 0) of the selected frame's terminal." |
| 1475 | (let ((frame-type (framep-on-display))) | 1476 | (let ((frame-type (framep-on-display))) |
| 1476 | (cond | 1477 | (cond |
| 1478 | ((eq frame-type 'ns) | ||
| 1479 | (ns-set-mouse-absolute-pixel-position x y)) | ||
| 1477 | ((eq frame-type 'x) | 1480 | ((eq frame-type 'x) |
| 1478 | (x-set-mouse-absolute-pixel-position x y)) | 1481 | (x-set-mouse-absolute-pixel-position x y)) |
| 1479 | ((eq frame-type 'w32) | 1482 | ((eq frame-type 'w32) |