diff options
| author | Stefan Monnier | 2025-04-04 16:45:25 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2025-04-04 16:45:25 -0400 |
| commit | fce3f0ad4af9630f17bb9c7d3a9db11cae1f8a0d (patch) | |
| tree | 35d5719b2d261729206e0ddd32fb8931edf82820 | |
| parent | 9983551f468405a5af443796c0eb7b53f735edb9 (diff) | |
| download | emacs-fce3f0ad4af9630f17bb9c7d3a9db11cae1f8a0d.tar.gz emacs-fce3f0ad4af9630f17bb9c7d3a9db11cae1f8a0d.zip | |
lisp/calc/calc-keypd.el (calc-keypad-vector-menu): Don't quote lambda
| -rw-r--r-- | lisp/calc/calc-keypd.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/calc/calc-keypd.el b/lisp/calc/calc-keypd.el index ad2b1741181..c3cc643fa53 100644 --- a/lisp/calc/calc-keypd.el +++ b/lisp/calc/calc-keypd.el | |||
| @@ -172,13 +172,13 @@ | |||
| 172 | ;; |PACK|UNPK|INDX|BLD |LEN |... | | 172 | ;; |PACK|UNPK|INDX|BLD |LEN |... | |
| 173 | 173 | ||
| 174 | (defvar calc-keypad-vector-menu | 174 | (defvar calc-keypad-vector-menu |
| 175 | '( ( ( "SUM" calc-vector-sum calc-vector-alt-sum calc-vector-mean ) | 175 | `( ( ( "SUM" calc-vector-sum calc-vector-alt-sum calc-vector-mean ) |
| 176 | ( "PROD" calc-vector-product nil calc-vector-sdev ) | 176 | ( "PROD" calc-vector-product nil calc-vector-sdev ) |
| 177 | ( "MAX" calc-vector-max calc-vector-min calc-vector-median ) | 177 | ( "MAX" calc-vector-max calc-vector-min calc-vector-median ) |
| 178 | ( "MAP*" (lambda () (interactive) | 178 | ( "MAP*" ,(lambda () (interactive) |
| 179 | (calc-map '(2 calcFunc-mul "*"))) ) | 179 | (calc-map '(2 calcFunc-mul "*"))) ) |
| 180 | ( "MAP^" (lambda () (interactive) | 180 | ( "MAP^" ,(lambda () (interactive) |
| 181 | (calc-map '(2 calcFunc-pow "^"))) ) | 181 | (calc-map '(2 calcFunc-pow "^"))) ) |
| 182 | ( "MAP$" calc-map-stack ) ) | 182 | ( "MAP$" calc-map-stack ) ) |
| 183 | ( ( "MINV" calc-inv ) | 183 | ( ( "MINV" calc-inv ) |
| 184 | ( "MDET" calc-mdet ) | 184 | ( "MDET" calc-mdet ) |