diff options
author | Kim F. Storm <[email protected]> | 2003-11-27 21:28:01 +0000 |
---|---|---|
committer | Kim F. Storm <[email protected]> | 2003-11-27 21:28:01 +0000 |
commit | e08f9a0df92ee0d3cbb00126b39cc648553e3e7f (patch) | |
tree | 48b3fdd2488b9d47ddd900bc9a857474babf2c20 /lisp | |
parent | f65536faefa52fcd0da5f9fb77e3bd31ce5cefc6 (diff) |
(posn-object-x-y): New defun.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/subr.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 9dc6c2ba6e..dba7331f98 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -757,6 +757,12 @@ POSITION should be a list of the form returned by the `event-start' and `event-end' functions." (nth 4 position)) +(defsubst posn-object-x-y (position) + "Return the x and y coordinates relative to the object of POSITION. +POSITION should be a list of the form returned by the `event-start' +and `event-end' functions." + (nth 7 position)) + ;;;; Obsolescent names for functions. |