* xterm.h (struct x_display_info): Add invisible_cursor.

(struct x_output): Add current_cursor.

* xterm.c (XTtoggle_invisible_pointer): New function.
(x_define_frame_cursor): Don't define cursor if invisible or the
same as before.  Set current_cursor.
(x_create_terminal): Set toggle_invisible_pointer_hook.

* xfns.c (make_invisible_cursor): New function.
(x_set_mouse_color): Call make_invisible_cursor.
Set current_cursor.
(x_window): Set current_cursor.

* termhooks.h (struct terminal): Add toggle_invisible_pointer_hook.

* keyboard.c (command_loop_1): Call frame_make_pointer_invisible after
inserting a character.
(read_avail_input): Call frame_make_pointer_visible.

* frame.c (Vmake_pointer_invisible): New variable.
(frame_make_pointer_invisible, frame_make_pointer_visible): New
functions.
(syms_of_frame): DEFVAR make-pointer-invisible, initialize to Qt.

* frame.h: Declare frame_make_pointer_invisible and
frame_make_pointer_visible.
(struct frame): Add pointer_invisible.

* cus-start.el (all): Added make-pointer-invisible.

2 files changed, 5 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 126d0df81b4..72a512967b1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-07-03  Jan Djärv  <jan.h.d@swipnet.se>
+
+        * cus-start.el (all): Added make-pointer-invisible.
+
 2009-07-03  Jay Belanger  <jay.p.belanger@gmail.com>
 
         * calc-math.el (math-use-emacs-fn): Make sure that the number is
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 09a0a93b103..11b03887ac0 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -179,6 +179,7 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
                                             (const :tag "always shown" t)
                                             (other :tag "hidden by keypress" 1))
                               "22.1")
+             (make-pointer-invisible mouse boolean "23.2")
              ;; fringe.c
              (overflow-newline-into-fringe fringe boolean)
              ;; indent.c