[nongnu] elpa/paredit bd0e5ba 072/224: Don't mask errors during `buffer-string' in `paredit-unescape-string'.

[ELPA Syncer]

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

    Don't mask errors during `buffer-string' in `paredit-unescape-string'.
    
    Ignore-this: 8ca077b074853d64639e83f4a81dcd73
    
    darcs-hash:20110320190601-00fcc-54e85aa35638a194de67b28be83fcf65575d7adf
---
 paredit.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/paredit.el b/paredit.el
index 427fdbf..33dff5e 100644
--- a/paredit.el
+++ b/paredit.el
@@ -2079,9 +2079,8 @@ With a prefix argument N, move up N lists before 
wrapping."
                 (search-forward "\\" nil t))
       (delete-char -1)
       (forward-char))
-    (condition-case condition
-        (progn (check-parens) (buffer-string))
-      (error nil))))
+    (funcall (condition-case condition (progn (check-parens) 'buffer-string)
+               (error (lambda () nil))))))
 
 ;;;; Slurpage & Barfage