* lisp/emacs-lisp/cconv.el (cconv--analyze-use): Simplify (doh!)
This commit is contained in:
parent
009bc7c9d8
commit
ba6ae500f1
1 changed files with 1 additions and 1 deletions
|
@ -602,7 +602,7 @@ FORM is the parent form that binds this var."
|
||||||
(byte-compile-warn
|
(byte-compile-warn
|
||||||
"%s `%S' not left unused" varkind var))
|
"%s `%S' not left unused" varkind var))
|
||||||
((and (let (or 'let* 'let) (car form))
|
((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 ,_ ,_))
|
t nil ,_ ,_))
|
||||||
;; FIXME: Convert this warning to use `macroexp--warn-wrap'
|
;; FIXME: Convert this warning to use `macroexp--warn-wrap'
|
||||||
;; so as to give better position information.
|
;; so as to give better position information.
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue