aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorMartin Rudalics2015-08-21 11:00:59 +0200
committerMartin Rudalics2015-08-21 11:00:59 +0200
commitdf9b29eda0ba1ec7f751dfd538eefbfe56b2c043 (patch)
treec3797cfe3d7c8596438a88502838652f14703582 /src
parent092e17b1978d804df99fae9436f24c0ea0d7e034 (diff)
downloademacs-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.m8
-rw-r--r--src/w32fns.c20
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
2909DEFUN ("x-frame-geometry", Fx_frame_geometry, Sx_frame_geometry, 0, 1, 0, 2909DEFUN ("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.
2911FRAME must be a live frame and defaults to the selected one. The return 2911FRAME must be a live frame and defaults to the selected one. The return
2912value is an association list of the attributes listed below. All height 2912value 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
2953DEFUN ("x-frame-edges", Fx_frame_edges, Sx_frame_edges, 0, 2, 0, 2953DEFUN ("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.
2955FRAME must be a live frame and defaults to the selected one. The return 2955FRAME must be a live frame and defaults to the selected one. The return
2956value is a list of the form (LEFT, TOP, RIGHT, BOTTOM). All values are 2956value 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
8005DEFUN ("x-frame-geometry", Fx_frame_geometry, Sx_frame_geometry, 0, 1, 0, 8005DEFUN ("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.
8007FRAME must be a live frame and defaults to the selected one. The return 8007FRAME must be a live frame and defaults to the selected one. The return
8008value is an association list of the attributes listed below. All height 8008value 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
8141DEFUN ("x-frame-edges", Fx_frame_edges, Sx_frame_edges, 0, 2, 0, 8141DEFUN ("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.
8143FRAME must be a live frame and defaults to the selected one. The return 8143FRAME must be a live frame and defaults to the selected one. The return
8144value is a list of the form (LEFT, TOP, RIGHT, BOTTOM). All values are 8144value 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
8216DEFUN ("x-mouse-absolute-pixel-position", Fx_mouse_absolute_pixel_position, 8216DEFUN ("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.
8219The position is returned as a cons cell (X . Y) of the coordinates of 8219The position is returned as a cons cell (X . Y) of the coordinates of
8220the mouse cursor position in pixels relative to a position (0, 0) of the 8220the 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
8233DEFUN ("x-set-mouse-absolute-pixel-position", Fx_set_mouse_absolute_pixel_position, 8233DEFUN ("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).
8236The coordinates X and Y are interpreted in pixels relative to a position 8236The 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 */