From f7c26b9336361c368dfdaae278da3838d2879bc7 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Mon, 5 Jan 2009 13:33:55 +0000 Subject: Fix kill & yank errors with `paredit-lose-if-not-in-sexp' while barfing. darcs-hash:20090105133355-00fcc-b6838fcc0a0a8f3a8345866a67b717b8f4b8ac5b --- paredit.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'paredit.el') diff --git a/paredit.el b/paredit.el index d5d65ee..d6d527b 100644 --- a/paredit.el +++ b/paredit.el @@ -1823,7 +1823,7 @@ If in a string, move the opening double-quote forward by one Automatically reindent the newly barfed S-expression with respect to its new enclosing form." (interactive) - (paredit-lose-if-not-in-sexp 'paredit-forward-slurp-sexp) + (paredit-lose-if-not-in-sexp 'paredit-forward-barf-sexp) (save-excursion (up-list) ; Up to the end of the list to (let ((close (char-before))) ; save and delete the closing @@ -1895,7 +1895,7 @@ If in a string, move the opening double-quote backward by one Automatically reindent the barfed S-expression and the form from which it was barfed." (interactive) - (paredit-lose-if-not-in-sexp 'paredit-forward-slurp-sexp) + (paredit-lose-if-not-in-sexp 'paredit-backward-barf-sexp) (save-excursion (backward-up-list) (let ((open (char-after))) -- cgit v1.2.1