From c9ceb35a27ce0e9dac94cfd67d243aa136a6c96c Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Tue, 16 Jul 2013 13:42:58 -0400 Subject: function to join to next line with one space --- init/km-func.el | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'init/km-func.el') diff --git a/init/km-func.el b/init/km-func.el index 5c36208..66f8187 100644 --- a/init/km-func.el +++ b/init/km-func.el @@ -113,3 +113,12 @@ KILLARG." (global-set-key (kbd "C-c k w") 'km/kill-word-at-point) (global-set-key (kbd "C-c k p") 'km/kill-paragraph-at-point) (global-set-key (kbd "C-c k l") 'km/kill-line-at-point) + +(defun km/join-next-line-with-space () + "Join current line to the next line with a space in between" + (interactive) + (move-end-of-line 1) + (kill-line) + (just-one-space)) + +(global-set-key (kbd "C-c k j") 'km/join-next-line-with-space) -- cgit v1.2.3