diff --git a/core/libs/dash.el b/core/libs/dash.el
index 2909e0797..ce1809aa7 100644
--- a/core/libs/dash.el
+++ b/core/libs/dash.el
@@ -206,7 +206,7 @@ This function's anaphoric counterpart is `--map'."
 Each element of LIST in turn is bound to `it' before evaluating
 BODY.
 This is the anaphoric counterpart to `-map'."
-  (declare (debug (form form)))
+  (declare (debug (def-form form)))
   `(mapcar (lambda (it) (ignore it) ,form) ,list))
 
 (defmacro --reduce-from (form init list)