Add prefix arg to prelude-smart-open-line

With a prefix arg the command will invoke prelude-smart-open-line-above
This commit is contained in:
Bozhidar Batsov 2013-06-29 09:26:23 +03:00
parent 9116d5a0c8
commit f76aab7491

View file

@ -90,12 +90,17 @@ Position the cursor at it's beginning, according to the current mode."
(forward-line -1)
(indent-according-to-mode))
(defun prelude-smart-open-line ()
(defun prelude-smart-open-line (arg)
"Insert an empty line after the current line.
Position the cursor at its beginning, according to the current mode."
(interactive)
Position the cursor at its beginning, according to the current mode.
With a prefix ARG open line above the current line."
(interactive "P")
(if arg
(prelude-smart-open-line-above)
(progn
(move-end-of-line nil)
(newline-and-indent))
(newline-and-indent))))
(defun prelude-top-join-line ()
"Join the current line with the line beneath it."