From a1f09d9765a49fe7e111d6bb4a14b3ead81b7cff Mon Sep 17 00:00:00 2001
From: malc <moosotc@gmail.com>
Date: Thu, 24 Dec 2015 19:31:35 +0300
Subject: [PATCH] More appropriate default cursor

---
 link.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/link.c b/link.c
index 4ad1c9e..bc07443 100644
--- a/link.c
+++ b/link.c
@@ -3913,7 +3913,7 @@ CAMLprim value ml_setaalevel (value level_v)
 #endif
 
 static const int shapes[] = {
-    XC_arrow, XC_hand2, XC_exchange, XC_fleur, XC_xterm
+    XC_left_ptr, XC_hand2, XC_exchange, XC_fleur, XC_xterm
 };
 
 #define CURS_COUNT (sizeof (shapes) / sizeof (shapes[0]))
-- 
2.11.4.GIT