[elpa] master 19036bd: Fix replacement verification for splicing mode

[Michael Heerdegen]

branch: master
commit 19036bd31337e3cb80dcabbec855effdf6d00493
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    Fix replacement verification for splicing mode
---
 packages/el-search/el-search.el |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index 61aa9b8..3e3d828 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -7,7 +7,7 @@
 ;; Created: 29 Jul 2015
 ;; Keywords: lisp
 ;; Compatibility: GNU Emacs 25
-;; Version: 0.2.2
+;; Version: 0.2.3
 ;; Package-Requires: ((emacs "25"))
 
 
@@ -644,9 +644,9 @@ reindent."
                     (el-search--ensure-sexp-start)
                   (end-of-buffer (goto-char (point-max))))))
             (goto-char 1)
-            (forward-sexp)
+            (forward-sexp (if splice (length replacement) 1))
             (let ((result (buffer-substring 1 (point))))
-              (if (equal replacement (read result))
+              (if (equal replacement (read (if splice (format "(%s)" result) 
result)))
                   result
                 (error "Error in `el-search--format-replacement' - please make 
a bug report"))))
         (kill-buffer orig-buffer)))))