Function: artist-forward-char
artist-forward-char is an interactive and byte-compiled function
defined in artist.el.gz.
Signature
(artist-forward-char &optional N)
Documentation
Move cursor forward N chars (default is 1), updating current shape.
If N is negative, move backward.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/textmodes/artist.el.gz
(defun artist-forward-char (&optional n)
"Move cursor forward N chars (default is 1), updating current shape.
If N is negative, move backward."
(interactive "p")
(let* ((step-x (if (>= n 0) 1 -1))
(distance (abs n))
(curr-col (artist-current-column))
(new-col (max 0 (+ curr-col (* distance step-x)))))
(if (not artist-key-is-drawing)
(move-to-column new-col t)
(move-to-column new-col t)
(artist-key-do-continuously-common))))