[sawfish] fixed small glitch in move-cursor

[Christopher Bratusek <chrisb src gnome org>]

commit d60f902b659105d9e80eddddc5111f1cc91087bb
Author: chrisb <zanghar freenet de>
Date:   Thu Jul 9 20:50:37 2009 +0200

    fixed small glitch in move-cursor

 ChangeLog                               |    3 +++
 lisp/sawfish/wm/commands/move-cursor.jl |    1 -
 2 files changed, 3 insertions(+), 1 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index a808bc8..e3ac4d5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,6 @@
+2009-07-09  Christopher Bratusek <zanghar freenet de>
+	* lisp/sawfish/wm/commands/move-cursor.jl: Fixed small glitch
+
 2009-07-04  Christopher Bratusek <zanghar freenet de>
 	* lisp/sawfish/wm/tabs/tab.jl: make changed value of
 	raise-tabs-on-hover take effect immediately
diff --git a/lisp/sawfish/wm/commands/move-cursor.jl b/lisp/sawfish/wm/commands/move-cursor.jl
index e65a8a5..5949097 100644
--- a/lisp/sawfish/wm/commands/move-cursor.jl
+++ b/lisp/sawfish/wm/commands/move-cursor.jl
@@ -54,7 +54,6 @@
 
   (define (move-cursor right down)
      (let ((coords (query-pointer)))
-       (setq dontmove t)
          (warp-cursor (+ (car coords) right) (+ (cdr coords) down))))
 
   (define (move-cursor-left)