diff --git a/init.lisp b/init.lisp
index 87c9a32..2ebdfbc 100644
--- a/init.lisp
+++ b/init.lisp
@@ -7,6 +7,7 @@
 ;; startup
 (setf *startup-message* nil)
 
+(run-shell-command "xsetroot -cursor_name left_ptr")
 (run-shell-command "autostart")
 
 ;;; load window placement rules