Index: src/xfns.c
===================================================================
RCS file: /sources/emacs/emacs/src/xfns.c,v
retrieving revision 1.726
diff -u -r1.726 xfns.c
--- src/xfns.c	31 Jul 2008 05:33:55 -0000	1.726
+++ src/xfns.c	3 Dec 2008 18:51:28 -0000
@@ -67,6 +67,7 @@
 #endif
 
 #ifdef USE_X_TOOLKIT
+#include <X11/extensions/Xfixes.h>
 #include <X11/Shell.h>
 
 #ifndef USE_MOTIF
@@ -5258,6 +5259,35 @@
 
 
 /***********************************************************************
+			Cursor visibility
+ ***********************************************************************/
+
+DEFUN ("x-show-pointer", Fx_show_pointer,
+       Sx_show_pointer,
+       0, 0, 0,
+       doc: /* Show the mouse pointer.  */)
+     ()
+{
+  FRAME_PTR f = SELECTED_FRAME ();
+  XFixesShowCursor (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f));
+  return Qt;
+}
+
+
+DEFUN ("x-hide-pointer", Fx_hide_pointer,
+       Sx_hide_pointer,
+       0, 0, 0,
+       doc: /* Hide the mouse pointer.  */)
+     ()
+{
+  FRAME_PTR f = SELECTED_FRAME ();
+  XFixesHideCursor (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f));
+  return Qt;
+}
+
+
+
+/***********************************************************************
 			File selection dialog
  ***********************************************************************/
 
@@ -5963,6 +5993,9 @@
   last_show_tip_args = Qnil;
   staticpro (&last_show_tip_args);
 
+  defsubr (&Sx_show_pointer);
+  defsubr (&Sx_hide_pointer);
+
   defsubr (&Sx_uses_old_gtk_dialog);
 #if defined (USE_MOTIF) || defined (USE_GTK)
   defsubr (&Sx_file_dialog);