Browse Source

Add prefix arg to prelude-smart-open-line

With a prefix arg the command will invoke prelude-smart-open-line-above
custom
Bozhidar Batsov 13 years ago
parent
commit
f76aab7491
  1. 15
      core/prelude-core.el

15
core/prelude-core.el

@ -90,12 +90,17 @@ Position the cursor at it's beginning, according to the current mode."
(forward-line -1) (forward-line -1)
(indent-according-to-mode)) (indent-according-to-mode))
(defun prelude-smart-open-line ()
(defun prelude-smart-open-line (arg)
"Insert an empty line after the current line. "Insert an empty line after the current line.
Position the cursor at its beginning, according to the current mode."
(interactive)
(move-end-of-line nil)
(newline-and-indent))
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))))
(defun prelude-top-join-line () (defun prelude-top-join-line ()
"Join the current line with the line beneath it." "Join the current line with the line beneath it."

Loading…
Cancel
Save