summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNic Ferier <nic@ferrier.me.uk>2013-06-03 08:53:44 +0100
committerNic Ferier <nic@ferrier.me.uk>2013-06-03 08:53:44 +0100
commit647980c7c4e6bea82603c2fcd672c1647811286a (patch)
tree1372a44b845d3b5a1496ac7181619d67f3f14d77
parentf27deaee2d22c8c998ab45b1b6a24a35d614b186 (diff)
add a specific indentation function spec, fixes #2
-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.