Issue #154: Make `Cursor hand` a cursor with hand shape jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Wed, 19 Jul 2017 13:01:28 +0100
branchjv
changeset 8076 53f81628e70c
parent 8075 00b6d158ab89
child 8077 08cff8ab7e0a
Issue #154: Make `Cursor hand` a cursor with hand shape ...as the name suggest, not plain arrow. The consequence is that uite a few widgets (buttons, nost notably) now show hand cursor rather than plain arrow. This makes Smalltalk/X UI consistent w.r.t running on X11 but may not be in line with Windows UI design guidelines. This has to checked and properly fixed in individual widgets - not by making hand cursor actually an arrow!
WinWorkstation.st
--- a/WinWorkstation.st	Wed Jul 19 09:45:40 2017 +0200
+++ b/WinWorkstation.st	Wed Jul 19 13:01:28 2017 +0100
@@ -10026,7 +10026,7 @@
 
 %{  /* NOCONTEXT */
     if (shape == @symbol(upRightHand)) {
-	RETURN ( __MKSMALLINT( (INT)IDC_ARROW));
+	RETURN ( __MKSMALLINT( (INT)IDC_HAND));
     }
     if (shape == @symbol(upLeftArrow)) {
 	RETURN ( __MKSMALLINT( (INT)IDC_ARROW));