diff options
| author | Martin Rudalics | 2015-08-21 11:00:59 +0200 |
|---|---|---|
| committer | Martin Rudalics | 2015-08-21 11:00:59 +0200 |
| commit | df9b29eda0ba1ec7f751dfd538eefbfe56b2c043 (patch) | |
| tree | c3797cfe3d7c8596438a88502838652f14703582 /src | |
| parent | 092e17b1978d804df99fae9436f24c0ea0d7e034 (diff) | |
| download | emacs-df9b29eda0ba1ec7f751dfd538eefbfe56b2c043.tar.gz emacs-df9b29eda0ba1ec7f751dfd538eefbfe56b2c043.zip | |
Sanitize frame geometry related functions
* src/nsfns.m (Fx_frame_geometry): Rename to Fns_frame_geometry.
(Fx_frame_edges): Rename to Fns_frame_edges.
* src/w32fns.c (Fx_frame_geometry): Rename to Fw32_frame_geometry.
(Fx_frame_edges): Rename to Fw32_frame_edges.
(Fx_mouse_absolute_pixel_position): Rename to
Fw32_mouse_absolute_pixel_position.
(Fx_set_mouse_absolute_pixel_position): Rename to
Fw32_set_mouse_absolute_pixel_position.
* lisp/frame.el (x-frame-geometry, w32-frame-geometry)
(ns-frame-geometry, x-frame-edges, w32-frame-edges)
(ns-frame-edges, w32-mouse-absolute-pixel-position)
(x-mouse-absolute-pixel-position)
(w32-set-mouse-absolute-pixel-position)
(x-set-mouse-absolute-pixel-position): Declare.
(frame-geometry, mouse-absolute-pixel-position)
(set-mouse-absolute-pixel-position): New functions.
(frame-edges): Rewrite in terms of x-/w32-/ns-frame-edges.
Diffstat (limited to 'src')
| -rw-r--r-- | src/nsfns.m | 8 | ||||
| -rw-r--r-- | src/w32fns.c | 20 |
2 files changed, 14 insertions, 14 deletions
diff --git a/src/nsfns.m b/src/nsfns.m index e9453604592..d317d48608c 100644 --- a/src/nsfns.m +++ b/src/nsfns.m | |||
| @@ -2906,7 +2906,7 @@ frame_geometry (Lisp_Object frame, Lisp_Object attribute) | |||
| 2906 | make_number (internal_border_width))); | 2906 | make_number (internal_border_width))); |
| 2907 | } | 2907 | } |
| 2908 | 2908 | ||
| 2909 | DEFUN ("x-frame-geometry", Fx_frame_geometry, Sx_frame_geometry, 0, 1, 0, | 2909 | DEFUN ("ns-frame-geometry", Fns_frame_geometry, Sns_frame_geometry, 0, 1, 0, |
| 2910 | doc: /* Return geometric attributes of FRAME. | 2910 | doc: /* Return geometric attributes of FRAME. |
| 2911 | FRAME must be a live frame and defaults to the selected one. The return | 2911 | FRAME must be a live frame and defaults to the selected one. The return |
| 2912 | value is an association list of the attributes listed below. All height | 2912 | value is an association list of the attributes listed below. All height |
| @@ -2950,7 +2950,7 @@ and width values are in pixels. | |||
| 2950 | return frame_geometry (frame, Qnil); | 2950 | return frame_geometry (frame, Qnil); |
| 2951 | } | 2951 | } |
| 2952 | 2952 | ||
| 2953 | DEFUN ("x-frame-edges", Fx_frame_edges, Sx_frame_edges, 0, 2, 0, | 2953 | DEFUN ("ns-frame-edges", Fns_frame_edges, Sns_frame_edges, 0, 2, 0, |
| 2954 | doc: /* Return edge coordinates of FRAME. | 2954 | doc: /* Return edge coordinates of FRAME. |
| 2955 | FRAME must be a live frame and defaults to the selected one. The return | 2955 | FRAME must be a live frame and defaults to the selected one. The return |
| 2956 | value is a list of the form (LEFT, TOP, RIGHT, BOTTOM). All values are | 2956 | value is a list of the form (LEFT, TOP, RIGHT, BOTTOM). All values are |
| @@ -3156,8 +3156,8 @@ be used as the image of the icon representing the frame. */); | |||
| 3156 | defsubr (&Sx_display_pixel_width); | 3156 | defsubr (&Sx_display_pixel_width); |
| 3157 | defsubr (&Sx_display_pixel_height); | 3157 | defsubr (&Sx_display_pixel_height); |
| 3158 | defsubr (&Sns_display_monitor_attributes_list); | 3158 | defsubr (&Sns_display_monitor_attributes_list); |
| 3159 | defsubr (&Sx_frame_geometry); | 3159 | defsubr (&Sns_frame_geometry); |
| 3160 | defsubr (&Sx_frame_edges); | 3160 | defsubr (&Sns_frame_edges); |
| 3161 | defsubr (&Sx_display_mm_width); | 3161 | defsubr (&Sx_display_mm_width); |
| 3162 | defsubr (&Sx_display_mm_height); | 3162 | defsubr (&Sx_display_mm_height); |
| 3163 | defsubr (&Sx_display_screens); | 3163 | defsubr (&Sx_display_screens); |
diff --git a/src/w32fns.c b/src/w32fns.c index a47f3f9a8dc..f16bf762127 100644 --- a/src/w32fns.c +++ b/src/w32fns.c | |||
| @@ -8002,7 +8002,7 @@ This is a direct interface to the Windows API FindWindow function. */) | |||
| 8002 | return Qt; | 8002 | return Qt; |
| 8003 | } | 8003 | } |
| 8004 | 8004 | ||
| 8005 | DEFUN ("x-frame-geometry", Fx_frame_geometry, Sx_frame_geometry, 0, 1, 0, | 8005 | DEFUN ("w32-frame-geometry", Fw32_frame_geometry, Sw32_frame_geometry, 0, 1, 0, |
| 8006 | doc: /* Return geometric attributes of FRAME. | 8006 | doc: /* Return geometric attributes of FRAME. |
| 8007 | FRAME must be a live frame and defaults to the selected one. The return | 8007 | FRAME must be a live frame and defaults to the selected one. The return |
| 8008 | value is an association list of the attributes listed below. All height | 8008 | value is an association list of the attributes listed below. All height |
| @@ -8138,7 +8138,7 @@ and width values are in pixels. | |||
| 8138 | make_number (internal_border_width))); | 8138 | make_number (internal_border_width))); |
| 8139 | } | 8139 | } |
| 8140 | 8140 | ||
| 8141 | DEFUN ("x-frame-edges", Fx_frame_edges, Sx_frame_edges, 0, 2, 0, | 8141 | DEFUN ("w32-frame-edges", Fw32_frame_edges, Sw32_frame_edges, 0, 2, 0, |
| 8142 | doc: /* Return edge coordinates of FRAME. | 8142 | doc: /* Return edge coordinates of FRAME. |
| 8143 | FRAME must be a live frame and defaults to the selected one. The return | 8143 | FRAME must be a live frame and defaults to the selected one. The return |
| 8144 | value is a list of the form (LEFT, TOP, RIGHT, BOTTOM). All values are | 8144 | value is a list of the form (LEFT, TOP, RIGHT, BOTTOM). All values are |
| @@ -8213,8 +8213,8 @@ menu bar or tool bar of FRAME. */) | |||
| 8213 | } | 8213 | } |
| 8214 | } | 8214 | } |
| 8215 | 8215 | ||
| 8216 | DEFUN ("x-mouse-absolute-pixel-position", Fx_mouse_absolute_pixel_position, | 8216 | DEFUN ("w32-mouse-absolute-pixel-position", Fw32_mouse_absolute_pixel_position, |
| 8217 | Sx_mouse_absolute_pixel_position, 0, 0, 0, | 8217 | Sw32_mouse_absolute_pixel_position, 0, 0, 0, |
| 8218 | doc: /* Return absolute position of mouse cursor in pixels. | 8218 | doc: /* Return absolute position of mouse cursor in pixels. |
| 8219 | The position is returned as a cons cell (X . Y) of the coordinates of | 8219 | The position is returned as a cons cell (X . Y) of the coordinates of |
| 8220 | the mouse cursor position in pixels relative to a position (0, 0) of the | 8220 | the mouse cursor position in pixels relative to a position (0, 0) of the |
| @@ -8230,8 +8230,8 @@ selected frame's display. */) | |||
| 8230 | return Fcons (make_number (pt.x), make_number (pt.y)); | 8230 | return Fcons (make_number (pt.x), make_number (pt.y)); |
| 8231 | } | 8231 | } |
| 8232 | 8232 | ||
| 8233 | DEFUN ("x-set-mouse-absolute-pixel-position", Fx_set_mouse_absolute_pixel_position, | 8233 | DEFUN ("w32-set-mouse-absolute-pixel-position", Fw32_set_mouse_absolute_pixel_position, |
| 8234 | Sx_set_mouse_absolute_pixel_position, 2, 2, 0, | 8234 | Sw32_set_mouse_absolute_pixel_position, 2, 2, 0, |
| 8235 | doc: /* Move mouse pointer to absolute pixel position (X, Y). | 8235 | doc: /* Move mouse pointer to absolute pixel position (X, Y). |
| 8236 | The coordinates X and Y are interpreted in pixels relative to a position | 8236 | The coordinates X and Y are interpreted in pixels relative to a position |
| 8237 | (0, 0) of the selected frame's display. */) | 8237 | (0, 0) of the selected frame's display. */) |
| @@ -9280,10 +9280,10 @@ This variable has effect only on Windows Vista and later. */); | |||
| 9280 | defsubr (&Sx_open_connection); | 9280 | defsubr (&Sx_open_connection); |
| 9281 | defsubr (&Sx_close_connection); | 9281 | defsubr (&Sx_close_connection); |
| 9282 | defsubr (&Sx_display_list); | 9282 | defsubr (&Sx_display_list); |
| 9283 | defsubr (&Sx_frame_geometry); | 9283 | defsubr (&Sw32_frame_geometry); |
| 9284 | defsubr (&Sx_frame_edges); | 9284 | defsubr (&Sw32_frame_edges); |
| 9285 | defsubr (&Sx_mouse_absolute_pixel_position); | 9285 | defsubr (&Sw32_mouse_absolute_pixel_position); |
| 9286 | defsubr (&Sx_set_mouse_absolute_pixel_position); | 9286 | defsubr (&Sw32_set_mouse_absolute_pixel_position); |
| 9287 | defsubr (&Sx_synchronize); | 9287 | defsubr (&Sx_synchronize); |
| 9288 | 9288 | ||
| 9289 | /* W32 specific functions */ | 9289 | /* W32 specific functions */ |