(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))
+
\f
;;; Defaults
("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)