www.delorie.com/gnu/docs/emacs-lisp-intro/emacs-lisp-intro_247.html

search

	Buy the book!

Programming in Emacs Lisp

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"))