Commit cb7bddf6 authored by Thien-Thi Nguyen's avatar Thien-Thi Nguyen
Browse files

(artist-previous-line, artist-next-line): Use forward-line.

parent fdd2ae6d
2007-10-18 Thien-Thi Nguyen <ttn@gnuvola.org>
* textmodes/artist.el (artist-previous-line, artist-next-line):
Use forward-line.
2007-10-18 Juanma Barranquero <lekktu@gmail.com> 2007-10-18 Juanma Barranquero <lekktu@gmail.com>
* textmodes/fill.el (fill-individual-paragraphs): Doc fix. * textmodes/fill.el (fill-individual-paragraphs): Doc fix.
......
...@@ -4383,13 +4383,10 @@ With non-nil ARG, set the last point." ...@@ -4383,13 +4383,10 @@ With non-nil ARG, set the last point."
If N is negative, move cursor down." If N is negative, move cursor down."
(interactive "p") (interactive "p")
(let ((col (artist-current-column))) (let ((col (artist-current-column)))
(if (not artist-key-is-drawing) (forward-line (- n))
(progn (move-to-column col t))
(previous-line n) (when artist-key-is-drawing
(move-to-column col t)) (artist-key-do-continously-common)))
(previous-line n)
(move-to-column col t)
(artist-key-do-continously-common))))
(defun artist-next-line (&optional n) (defun artist-next-line (&optional n)
...@@ -4397,13 +4394,10 @@ If N is negative, move cursor down." ...@@ -4397,13 +4394,10 @@ If N is negative, move cursor down."
If N is negative, move cursor up." If N is negative, move cursor up."
(interactive "p") (interactive "p")
(let ((col (artist-current-column))) (let ((col (artist-current-column)))
(if (not artist-key-is-drawing) (forward-line n)
(progn (move-to-column col t))
(next-line n) (when artist-key-is-drawing
(move-to-column col t)) (artist-key-do-continously-common)))
(next-line n)
(move-to-column col t)
(artist-key-do-continously-common))))
(defun artist-backward-char (&optional n) (defun artist-backward-char (&optional n)
"Move cursor backward optional N chars (default is 1), updating curr shape. "Move cursor backward optional N chars (default is 1), updating curr shape.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment