mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-05 11:49:37 +00:00
Fix emacs native compilation warning
``` ■ Warning (comp): use-package-core.el:907:2: Warning: docstring has wrong usage of unescaped single quotes (use \= or different quoting) ■ Warning (comp): use-package-core.el:930:2: Warning: docstring has wrong usage of unescaped single quotes (use \= or different quoting) ``` To reproduce, have emacs build with native compilation and notice the compilation logs. You can then open this file and run `M-x emacs-lisp-native-compile-and-load` before and after the changes to see the warning is removed.
This commit is contained in:
parent
6c2fdaffd9
commit
3feedce08d
1 changed files with 3 additions and 3 deletions
|
@ -910,12 +910,12 @@ If RECURSED is non-nil, recurse into sublists."
|
||||||
sym
|
sym
|
||||||
\\='sym
|
\\='sym
|
||||||
(quote sym)
|
(quote sym)
|
||||||
#'sym
|
#\\='sym
|
||||||
(function sym)
|
(function sym)
|
||||||
(lambda () ...)
|
(lambda () ...)
|
||||||
\\='(lambda () ...)
|
\\='(lambda () ...)
|
||||||
(quote (lambda () ...))
|
(quote (lambda () ...))
|
||||||
#'(lambda () ...)
|
#\\='(lambda () ...)
|
||||||
(function (lambda () ...))"
|
(function (lambda () ...))"
|
||||||
(or (if binding
|
(or (if binding
|
||||||
(symbolp v)
|
(symbolp v)
|
||||||
|
@ -930,7 +930,7 @@ If RECURSED is non-nil, recurse into sublists."
|
||||||
(defun use-package-normalize-function (v)
|
(defun use-package-normalize-function (v)
|
||||||
"Reduce functional constructions to one of two normal forms:
|
"Reduce functional constructions to one of two normal forms:
|
||||||
sym
|
sym
|
||||||
#'(lambda () ...)"
|
#\\='(lambda () ...)"
|
||||||
(cond ((symbolp v) v)
|
(cond ((symbolp v) v)
|
||||||
((and (listp v)
|
((and (listp v)
|
||||||
(memq (car v) '(quote function))
|
(memq (car v) '(quote function))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue