diff lisp/x-mouse.el @ 284:558f606b08ae r21-0b40

Import from CVS: tag r21-0b40
author cvs
date Mon, 13 Aug 2007 10:34:13 +0200
parents c5d627a313b1
children 4b85ae5eabfb
line wrap: on
line diff
--- a/lisp/x-mouse.el	Mon Aug 13 10:33:19 2007 +0200
+++ b/lisp/x-mouse.el	Mon Aug 13 10:34:13 2007 +0200
@@ -165,6 +165,9 @@
     (set-glyph-image toolbar-pointer-glyph
 	  (or (x-get-resource "toolBarPointer" "Cursor" 'string device)
 	      "left_ptr"))
+    (set-glyph-image divider-pointer-glyph
+	  (or (x-get-resource "dividerPointer" "Cursor" 'string device)
+	      "sb_h_double_arrow"))
     (let ((fg
 	   (x-get-resource "pointerColor" "Foreground" 'string device)))
       (and fg