From e5c2d14707040e9fab4ce5a5c8e2e64d7aa4f5c1 Mon Sep 17 00:00:00 2001 From: Amin Bandali Date: Sat, 18 Apr 2020 02:45:01 -0400 Subject: [PATCH 1/1] * init.el: Add b/join-line-top for joining the next line to this one --- init.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/init.el b/init.el index 01ee10a..fde1428 100644 --- a/init.el +++ b/init.el @@ -250,6 +250,11 @@ For disabling the behaviour for certain buffers and/or modes." (point))) (move-beginning-of-line arg))) +(defun b/join-line-top () + "Like `join-line', but join next line to the current line." + (interactive) + (join-line 1)) + ;;; Defaults @@ -523,6 +528,8 @@ For disabling the behaviour for certain buffers and/or modes." ("C-S-h C" . describe-char) ("C-S-h F" . describe-face) + ("C-S-j" . b/join-line-top) + ("C-c x" . execute-extended-command) ("C-x k" . b/kill-current-buffer) -- 2.20.1