Node:Miscellaneous, Next:Mode Line, Previous:X11 Colors, Up:Emacs Initialization

16.13 Miscellaneous Settings for a .emacs File

Here are a few miscellaneous settings:

• Set the shape and color of the mouse cursor:

  ; Cursor shapes are defined in
  ; `/usr/include/X11/cursorfont.h';
  ; for example, the `target' cursor is number 128;
  ; the `top_left_arrow' cursor is number 132.
  
  (let ((mpointer (x-get-resource "*mpointer"
                                  "*emacs*mpointer")))
    ;; If you have not set your mouse pointer
    ;;     then set it, otherwise leave as is:
    (if (eq mpointer nil)
        (setq mpointer "132")) ; top_left_arrow
    (setq x-pointer-shape (string-to-int mpointer))
    (set-mouse-color "white"))