mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

Remove redundant #' before lambda in calc/*.el

Browse source 
* lisp/calc/calc-alg.el (math-defsimplify):
* lisp/calc/calc-ext.el (math-defintegral, math-defintegral-2):
* lisp/calc/calc-prog.el (math-do-arg-check): Remove redundant #'
before lambda.
This commit is contained in:
Stefan Kangas 2021-04-05 17:28:05 +02:00
parent 0342354c15
commit 81940e9c0e
3 changed files with 23 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/calc/calc-prog.el
View file

@ -1881,9 +1881,9 @@ Redefine the corresponding command."
(if (fboundp (setq chk (intern (concat "math-" qual-name))))
(append rest
(if is-rest
`((mapcar #'(lambda (x)
(or (,chk x)
(math-reject-arg x ',qual)))
`((mapcar (lambda (x)
(or (,chk x)
(math-reject-arg x ',qual)))
,var))
`((or (,chk ,var)
(math-reject-arg ,var ',qual)))))
@ -1894,9 +1894,9 @@ Redefine the corresponding command."
qual-name 1))))))
(append rest
(if is-rest
`((mapcar #'(lambda (x)
(and (,chk x)
(math-reject-arg x ',qual)))
`((mapcar (lambda (x)
(and (,chk x)
(math-reject-arg x ',qual)))
,var))
`((and
(,chk ,var)