diff options
| -rw-r--r-- | lisp/emacs-lisp/thunk.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/thunk.el b/lisp/emacs-lisp/thunk.el index d07b25736aa..0c5816a616d 100644 --- a/lisp/emacs-lisp/thunk.el +++ b/lisp/emacs-lisp/thunk.el | |||
| @@ -57,8 +57,8 @@ | |||
| 57 | ,forced | 57 | ,forced |
| 58 | (unless ,forced | 58 | (unless ,forced |
| 59 | (setf ,val (progn ,@body)) | 59 | (setf ,val (progn ,@body)) |
| 60 | (setf ,forced t))) | 60 | (setf ,forced t)) |
| 61 | ,val)))) | 61 | ,val))))) |
| 62 | 62 | ||
| 63 | (defun thunk-force (delayed) | 63 | (defun thunk-force (delayed) |
| 64 | "Force the evaluation of DELAYED. | 64 | "Force the evaluation of DELAYED. |