Bind M-? to `paredit-convolute-sexp'.

Ignore-this: 316cb4a43f14464fbcc655c61926f177

Thanks to Eitan Postavsky for the suggestion.

darcs-hash:20110320174113-00fcc-bc6d366e415e031be7bb6faa7353caabcd3d9c57

1 files changed, 3 insertions, 0 deletions

diff --git a/paredit.el b/paredit.el
index 63272c0..22927bf 100644
--- a/paredit.el
+++ b/paredit.el
@@ -417,6 +417,9 @@ Paredit behaves badly if parentheses are imbalanced, so exercise
                 ("(dynamic-wind in (lambda () |body) out)"
                  "(dynamic-wind in |body out)"
                  "|body"))
+   ("M-?"       paredit-convolute-sexp
+                ("(let ((x 5) (y 3)) (frob |(zwonk)) (wibblethwop))"
+                 "|(frob (let ((x 5) (y 3)) (zwonk) (wibblethwop)))"))
 
    "Barfage & Slurpage"
    (("C-)" "C-<right>")