branch: externals/compat
commit 2faab7861a6883db5f3769337cec241898734ea4
Author: Philip Kaludercic <phil...@posteo.net>
Commit: Philip Kaludercic <phil...@posteo.net>
Add debug specification for setq-local
---
compat-27.1.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/compat-27.1.el b/compat-27.1.el
index 9195a34..59a4fe7 100644
--- a/compat-27.1.el
+++ b/compat-27.1.el
@@ -110,6 +110,7 @@ Letter-case is significant, but text properties are
ignored."
(compat-advise setq-local (&rest pairs)
"Handle multiple assignments."
:cond (compat-maxargs-/= #'setq-local 'many)
+ (declare (debug setq))
(unless (zerop (mod (length pairs) 2))
(error "PAIRS must have an even number of variable/value members"))
(let (body)
