Re: What is "splicing mode" in el-search.el?

[Michael Heerdegen]

Michael Heerdegen <michael_heerdegen@web.de> writes:

> But it seems I have broken this submode with one of my latest commits,
> I get an error here when I try to enable it.  Will try to fix soon.

Here is a quick fix:

*** /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)))))


Thanks,

Michael.