Commit c4b20fc9 authored by Johan Bockgård's avatar Johan Bockgård
Browse files

pcase.el: Fix edebugging of backquoted cons patterns

* lisp/emacs-lisp/pcase.el (pcase-QPAT): Fix edebugging of backquoted
cons patterns. (Bug#21920)
parent 8ff888a0
......@@ -865,8 +865,10 @@ Otherwise, it defers to REST which is a list of branches of the form
(def-edebug-spec
pcase-QPAT
;; Cf. edebug spec for `backquote-form' in edebug.el.
(&or ("," pcase-PAT)
(pcase-QPAT . pcase-QPAT)
(pcase-QPAT [&rest [&not ","] pcase-QPAT]
. [&or nil pcase-QPAT])
(vector &rest pcase-QPAT)
sexp))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment