*** /tmp/ediff32294tUJ	2016-09-06 16:55:46.448723416 +0200
--- /home/micha/software/elpa/packages/el-search/el-search.el	2016-09-06 16:54:46.567573946 +0200
***************
*** 647,655 ****
                      (el-search--ensure-sexp-start)
                    (end-of-buffer (goto-char (point-max))))))
              (goto-char 1)
!             (forward-sexp)
              (let ((result (buffer-substring 1 (point))))
!               (if (equal replacement (read result))
                    result
                  (error "Error in `el-search--format-replacement' - please make a bug report"))))
          (kill-buffer orig-buffer)))))
--- 647,655 ----
                      (el-search--ensure-sexp-start)
                    (end-of-buffer (goto-char (point-max))))))
              (goto-char 1)
!             (forward-sexp (if splice (length replacement) 1))
              (let ((result (buffer-substring 1 (point))))
!               (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)))))