# HG changeset patch # User YAMAMOTO Mitsuharu # Date 1110943414 0 # Node ID ffb5c0421a148866da9c654f23a41c00f270a5c3 # Parent e51f0754a4c484c9b8f353039388b6c031b3b9db Add mouse pointer shape constants. diff -r e51f0754a4c4 -r ffb5c0421a14 lisp/term/mac-win.el --- a/lisp/term/mac-win.el Tue Mar 15 23:15:05 2005 +0000 +++ b/lisp/term/mac-win.el Wed Mar 16 03:23:34 2005 +0000 @@ -230,6 +230,55 @@ (funcall handler this-switch)) (setq args (cons orig-this-switch args))))) (nconc (nreverse args) x-invocation-args)) + + +;; +;; Standard Mac cursor shapes +;; + +(defconst mac-pointer-arrow 0) +(defconst mac-pointer-copy-arrow 1) +(defconst mac-pointer-alias-arrow 2) +(defconst mac-pointer-contextual-menu-arrow 3) +(defconst mac-pointer-I-beam 4) +(defconst mac-pointer-cross 5) +(defconst mac-pointer-plus 6) +(defconst mac-pointer-watch 7) +(defconst mac-pointer-closed-hand 8) +(defconst mac-pointer-open-hand 9) +(defconst mac-pointer-pointing-hand 10) +(defconst mac-pointer-counting-up-hand 11) +(defconst mac-pointer-counting-down-hand 12) +(defconst mac-pointer-counting-up-and-down-hand 13) +(defconst mac-pointer-spinning 14) +(defconst mac-pointer-resize-left 15) +(defconst mac-pointer-resize-right 16) +(defconst mac-pointer-resize-left-right 17) +;; Mac OS X 10.2 and later +(defconst mac-pointer-not-allowed 18) +;; Mac OS X 10.3 and later +(defconst mac-pointer-resize-up 19) +(defconst mac-pointer-resize-down 20) +(defconst mac-pointer-resize-up-down 21) +(defconst mac-pointer-poof 22) + +;; +;; Standard X cursor shapes that have Mac counterparts +;; + +(defconst x-pointer-left-ptr mac-pointer-arrow) +(defconst x-pointer-xterm mac-pointer-I-beam) +(defconst x-pointer-crosshair mac-pointer-cross) +(defconst x-pointer-plus mac-pointer-plus) +(defconst x-pointer-watch mac-pointer-watch) +(defconst x-pointer-hand2 mac-pointer-pointing-hand) +(defconst x-pointer-left-side mac-pointer-resize-left) +(defconst x-pointer-right-side mac-pointer-resize-right) +(defconst x-pointer-sb-h-double-arrow mac-pointer-resize-left-right) +(defconst x-pointer-top-side mac-pointer-resize-up) +(defconst x-pointer-bottom-side mac-pointer-resize-down) +(defconst x-pointer-sb-v-double-arrow mac-pointer-resize-up-down) + ;; ;; Available colors