[elpa] externals/dash 960b05f 276/439: Set -each, -each-while and -dotimes indent levels to 1.

[Phillip Lord]

branch: externals/dash
commit 960b05fe497b2f206594fc61e91299cc424ee4f5
Author: Johan Andersson <address@hidden>
Commit: Johan Andersson <address@hidden>

    Set -each, -each-while and -dotimes indent levels to 1.
---
 dash.el |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/dash.el b/dash.el
index 3c83412..12c04bc 100644
--- a/dash.el
+++ b/dash.el
@@ -70,6 +70,8 @@ special values."
   "Calls FN with every item in LIST. Returns nil, used for side-effects only."
   (--each list (funcall fn it)))
 
+(put '-each 'lisp-indent-function 1)
+
 (defmacro --each-while (list pred &rest body)
   "Anaphoric form of `-each-while'."
   (let ((l (make-symbol "list"))
@@ -88,6 +90,8 @@ special values."
 Returns nil, used for side-effects only."
   (--each-while list (funcall pred it) (funcall fn it)))
 
+(put '-each-while 'lisp-indent-function 2)
+
 (defmacro --dotimes (num &rest body)
   "Repeatedly executes BODY (presumably for side-effects) with `it` bound to 
integers from 0 through n-1."
   `(let ((it 0))
@@ -101,6 +105,8 @@ Returns nil, used for side-effects only."
   "Repeatedly calls FN (presumably for side-effects) passing in integers from 
0 through n-1."
   (--dotimes num (funcall fn it)))
 
+(put '-dotimes 'lisp-indent-function 1)
+
 (defun -map (fn list)
   "Returns a new list consisting of the result of applying FN to the items in 
LIST."
   (mapcar fn list))