(defun paredit-barf-all-the-way-forward () (interactive) (paredit-split-sexp) (paredit-forward-down) (paredit-splice-sexp) (if (eolp) (delete-horizontal-space)))
defun paredit-barf-all-the-way-forward () interactive paredit-split-sexp paredit-forward-down paredit-splice-sexp if (eolp) (delete-horizontal-space)