summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2021-03-11 22:31:39 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2021-03-11 22:31:39 -0500
commitba6ae500f19b7791a81005b0af54ca8354ebffcc (patch)
tree9c07b526248965d0060c81c90538c827f7f8e474 /lisp/emacs-lisp
parent009bc7c9d8bd0074a78ebef73102f600a514172c (diff)
downloademacs-ba6ae500f19b7791a81005b0af54ca8354ebffcc.tar.gz
emacs-ba6ae500f19b7791a81005b0af54ca8354ebffcc.tar.bz2
emacs-ba6ae500f19b7791a81005b0af54ca8354ebffcc.zip
* lisp/emacs-lisp/cconv.el (cconv--analyze-use): Simplify (doh!)
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cconv.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cconv.el b/lisp/emacs-lisp/cconv.el
index cfb0168a6e5..afaa13a8695 100644
--- a/lisp/emacs-lisp/cconv.el
+++ b/lisp/emacs-lisp/cconv.el
@@ -602,7 +602,7 @@ FORM is the parent form that binds this var."
(byte-compile-warn
"%s `%S' not left unused" varkind var))
((and (let (or 'let* 'let) (car form))
- `(,`(,var) ;; (or `(,var nil) : Too many false positives: bug#47080
+ `((,var) ;; (or `(,var nil) : Too many false positives: bug#47080
t nil ,_ ,_))
;; FIXME: Convert this warning to use `macroexp--warn-wrap'
;; so as to give better position information.