diff options
author | Richard M. Stallman <rms@gnu.org> | 1996-06-10 21:09:54 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1996-06-10 21:09:54 +0000 |
commit | c18c4da5731f52f644368d461edf0d29461642cb (patch) | |
tree | 16eabb30680e3b1cd155b31d14899ad3f4788f4d | |
parent | f873212a6208f9b1d692e6d0fe9f6b3bb4a04d16 (diff) | |
download | emacs-c18c4da5731f52f644368d461edf0d29461642cb.tar.gz |
(Fset_mouse_position): Remove the DOS-specific
definition (it's defined on `frame.c').
(syms_of_dosfns): Remove defsubr of `Fset_mouse_position'.
-rw-r--r-- | src/dosfns.c | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/src/dosfns.c b/src/dosfns.c index d66912f2363..9fc6f2ab4f9 100644 --- a/src/dosfns.c +++ b/src/dosfns.c @@ -165,17 +165,6 @@ Report whether a mouse is present.") return Qnil; } -DEFUN ("set-mouse-position", Fset_mouse_position, Sset_mouse_position, 3, 3, 0, - "Move the mouse pointer to the center of character cell (X,Y) in FRAME.\n\ -WARNING: If you use this under X windows,\n\ -you should call `unfocus-frame' afterwards.") - (frame, x, y) - Lisp_Object frame, x, y; -{ - mouse_moveto (XINT (x), XINT (y)); - return Qnil; -} - /* Function to translate colour names to integers. See lisp/term/pc-win.el for its definition. */ @@ -333,8 +322,6 @@ syms_of_dosfns () defsubr (&Smsdos_mouse_disable); #ifndef HAVE_X_WINDOWS defsubr (&Smsdos_mouse_p); - defsubr (&Sset_mouse_position); - Qmsdos_color_translate = intern ("msdos-color-translate"); staticpro (&Qmsdos_color_translate); #endif |