asandroq

;; joins two consecutives lines like vim's "J"
(defun join-lines ()
  (interactive)
  (save-excursion
    (end-of-line)
    (insert-char ?  1)
    (delete-char 1)
    (while (looking-at "\\s +")
      (delete-char 1))))