diff options
| author | Nicolas Petton | 2015-10-28 09:54:00 +0100 |
|---|---|---|
| committer | Nicolas Petton | 2015-10-28 09:56:03 +0100 |
| commit | 61b63f460ddfb443e2575e4fa7e7714b17579659 (patch) | |
| tree | 75a16441529e9720315ae319ef8371507ab90a6b | |
| parent | 6e2a4021d3fc0166b72c60088fb2cea01484453c (diff) | |
| download | emacs-61b63f460ddfb443e2575e4fa7e7714b17579659.tar.gz emacs-61b63f460ddfb443e2575e4fa7e7714b17579659.zip | |
* lisp/emacs-lisp/thunk.el (thunk-delay): Fix the macro.
| -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. |