Mercurial > hg > xemacs-beta
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