diff options
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 940b4869f51..1cda03ad0d5 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el | |||
| @@ -1135,7 +1135,7 @@ of FORM by signaling the error at compile-time." | |||
| 1135 | (setq constant nil)) | 1135 | (setq constant nil)) |
| 1136 | (setq args (cdr args))) | 1136 | (setq args (cdr args))) |
| 1137 | (if constant | 1137 | (if constant |
| 1138 | (eval form) | 1138 | (cons 'quote (eval form)) |
| 1139 | form))) | 1139 | form))) |
| 1140 | 1140 | ||
| 1141 | ;; Avoid having to write forward-... with a negative arg for speed. | 1141 | ;; Avoid having to write forward-... with a negative arg for speed. |