summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--noflet.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/noflet.el b/noflet.el
index 6b50dc8..02851d8 100644
--- a/noflet.el
+++ b/noflet.el
@@ -118,9 +118,11 @@ This is great for overriding in testing and such like.
It is NOT currently possible to create new bindings with noflet."
(declare (debug ((&rest (cl-defun)) cl-declarations body))
- (indent 1))
+ (indent ((&whole 4 &rest (&whole 1 &lambda &body)) &body)))
(apply 'noflet|expand bindings body))
+
+
(defmacro* let-while ((var expression) &rest body)
"A simple binding loop.