[elpa] externals/sketch-mode 457ba48: Fix/improve hide cursor

[ELPA Syncer]

branch: externals/sketch-mode
commit 457ba48962689aa85b6b3c85feef4ccc5aa79962
Author: Daniel Nicolai <dalanicolai@gmail.com>
Commit: Daniel Nicolai <dalanicolai@gmail.com>

    Fix/improve hide cursor
---
 sketch-mode.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/sketch-mode.el b/sketch-mode.el
index 3f356c0..74a8a40 100644
--- a/sketch-mode.el
+++ b/sketch-mode.el
@@ -402,7 +402,7 @@ Optionally set a custom GRID-PARAMETER (default is value of
                                                                                
                           (- (car coords) sketch-im-x-offset)
                                                                                
                           (+ (cdr coords) sketch-im-y-offset))))
                                                                                
                                   (force-mode-line-update))))))
-    (backward-char)))
+    (beginning-of-line)))
 
 ;; FIXME: `defvar' can't be meaningfully inside a function like that.
 ;; FIXME: Use a `sketch-' prefix for all dynbound vars.
@@ -870,7 +870,7 @@ else return nil"
                                                                                
                           (- (car coords) sketch-im-x-offset)
                                                                                
                           (+ (cdr coords) sketch-im-y-offset))))
                                                                                
                                   (force-mode-line-update))))))
-    (backward-char)))
+    (beginning-of-line)))
 
 (defun sketch-update (&optional lisp lisp-buffer)
   (unless sketch-mode
@@ -900,7 +900,7 @@ else return nil"
                                         ;; :map '(((rect . ((0 . 0) . (800 . 
600)))
                                         sketch
                                         (pointer arrow))))
-    (backward-char)))
+    (beginning-of-line)))
 
 
 (defun sketch-object-preview-update (object-type node start-coords end-coords)