Use forward-line instead of next-/previous-line.
This commit is contained in:
parent
d8e36b4b74
commit
fa9bb097a3
1 changed files with 4 additions and 4 deletions
|
@ -103,21 +103,21 @@ the curson at its beginning, according to the current mode."
|
||||||
(interactive)
|
(interactive)
|
||||||
(move-end-of-line nil)
|
(move-end-of-line nil)
|
||||||
(open-line 1)
|
(open-line 1)
|
||||||
(next-line 1)
|
(forward-line 1)
|
||||||
(indent-according-to-mode))
|
(indent-according-to-mode))
|
||||||
|
|
||||||
(defun prelude-move-line-up ()
|
(defun prelude-move-line-up ()
|
||||||
"Move up the current line."
|
"Move up the current line."
|
||||||
(interactive)
|
(interactive)
|
||||||
(transpose-lines 1)
|
(transpose-lines 1)
|
||||||
(previous-line 2))
|
(forward-line -2))
|
||||||
|
|
||||||
(defun prelude-move-line-down ()
|
(defun prelude-move-line-down ()
|
||||||
"Move down the current line."
|
"Move down the current line."
|
||||||
(interactive)
|
(interactive)
|
||||||
(next-line 1)
|
(forward-line 1)
|
||||||
(transpose-lines 1)
|
(transpose-lines 1)
|
||||||
(previous-line 1))
|
(forward-line -1))
|
||||||
|
|
||||||
;; add the ability to copy and cut the current line, without marking it
|
;; add the ability to copy and cut the current line, without marking it
|
||||||
(defadvice kill-ring-save (before slick-copy activate compile)
|
(defadvice kill-ring-save (before slick-copy activate compile)
|
||||||
|
|
Loading…
Reference in a new issue