summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTaylor R Campbell <campbell@mumble.net>2009-01-05 13:33:55 +0000
committerTaylor R Campbell <campbell@mumble.net>2009-01-05 13:33:55 +0000
commitf7c26b9336361c368dfdaae278da3838d2879bc7 (patch)
tree927c171ce47a4671b5e4c4dd0bb9cfa4fb47c59f
parentcd079c43209254a45c8f4de46e9e04d48655acbc (diff)
Fix kill & yank errors with `paredit-lose-if-not-in-sexp' while barfing.
darcs-hash:20090105133355-00fcc-b6838fcc0a0a8f3a8345866a67b717b8f4b8ac5b
-rw-r--r--paredit.el4
1 files 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)))