comparison lisp/msw-mouse.el @ 304:c6de09ad3017 r21-0b50

Import from CVS: tag r21-0b50
author cvs
date Mon, 13 Aug 2007 10:41:12 +0200
parents c9fe270a4101
children
comparison
equal deleted inserted replaced
303:d02ffe1d75ed 304:c6de09ad3017
29 ;; This file is dumped with XEmacs (when Windows support is compiled in). 29 ;; This file is dumped with XEmacs (when Windows support is compiled in).
30 30
31 ;;; Code: 31 ;;; Code:
32 32
33 (set-glyph-image text-pointer-glyph 33 (set-glyph-image text-pointer-glyph
34 [resource :resource-type cursor :resource-id "Ibeam"]) 34 [mswindows-resource :resource-type cursor :resource-id "Ibeam"])
35 (set-glyph-image nontext-pointer-glyph 35 (set-glyph-image nontext-pointer-glyph
36 [resource :resource-type cursor :resource-id "Normal"]) 36 [mswindows-resource :resource-type cursor :resource-id "Normal"])
37 (set-glyph-image selection-pointer-glyph 37 (set-glyph-image selection-pointer-glyph
38 [resource :resource-type cursor :resource-id "Normal"]) 38 [mswindows-resource :resource-type cursor :resource-id "Normal"])
39 (set-glyph-image modeline-pointer-glyph 39 (set-glyph-image modeline-pointer-glyph
40 [resource :resource-type cursor :resource-id "SizeNS"]) 40 [mswindows-resource :resource-type cursor :resource-id "SizeNS"])
41 (set-glyph-image divider-pointer-glyph 41 (set-glyph-image divider-pointer-glyph
42 [resource :resource-type cursor :resource-id "SizeWE"]) 42 [mswindows-resource :resource-type cursor :resource-id "SizeWE"])
43 (set-glyph-image busy-pointer-glyph 43 (set-glyph-image busy-pointer-glyph
44 [resource :resource-type cursor :resource-id "Wait"]) 44 [mswindows-resource :resource-type cursor :resource-id "Wait"])
45 (set-glyph-image gc-pointer-glyph 45 (set-glyph-image gc-pointer-glyph
46 [resource :resource-type cursor :resource-id "Wait"]) 46 [mswindows-resource :resource-type cursor :resource-id "Wait"])
47 47
48 ;;; msw-mouse.el ends here 48 ;;; msw-mouse.el ends here