branch: externals/dash
commit 65d27bb71df896f49c75901fb24f934ac4457508
Merge: 7fd71338dc c860155810
Author: Matus Goljer <matus.gol...@gmail.com>
Commit: GitHub <nore...@github.com>

    Merge pull request #396 from magnars/blc/keys
---
 dash.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/dash.el b/dash.el
index 26e1f8b46f..927f9626de 100644
--- a/dash.el
+++ b/dash.el
@@ -2214,7 +2214,9 @@ matchers based on the type of the expression.
 Key-value stores are disambiguated by placing a token &plist,
 &alist or &hash as a first item in the MATCH-FORM."
   (cond
-   ((symbolp match-form)
+   ((and (symbolp match-form)
+         ;; Don't bind things like &keys as if they were vars (#395).
+         (not (functionp (dash--get-expand-function match-form))))
     (dash--match-symbol match-form source))
    ((consp match-form)
     (cond

Reply via email to