[nongnu] elpa/paredit f7c26b9 027/224: Fix kill & yank errors with `paredit-lose-if-not-in-sexp' while barfing.

[ELPA Syncer]

branch: elpa/paredit
commit f7c26b9336361c368dfdaae278da3838d2879bc7
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>

    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(-)

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)))