[elpa] externals/dash 5f65fdf 159/316: Merge pull request #321 from wbolster/some-macro-indentation

[ELPA Syncer]

branch: externals/dash
commit 5f65fdfe2705c897614d47c9b6684cc02b4d878a
Merge: fdf6140 070b569
Author: Matus Goljer <matus.goljer@gmail.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #321 from wbolster/some-macro-indentation
    
    Add missing indent declaration for ‘-some->’ and siblings
---
 dash.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/dash.el b/dash.el
index 7b2c6af..d97a575 100644
--- a/dash.el
+++ b/dash.el
@@ -1539,7 +1539,8 @@ VARIABLE to the result of the first form, and so forth."
 (defmacro -some-> (x &optional form &rest more)
   "When expr is non-nil, thread it through the first form (via `->'),
 and when that result is non-nil, through the next form, etc."
-  (declare (debug ->))
+  (declare (debug ->)
+           (indent 1))
   (if (null form) x
     (let ((result (make-symbol "result")))
       `(-some-> (-when-let (,result ,x)
@@ -1549,7 +1550,8 @@ and when that result is non-nil, through the next form, 
etc."
 (defmacro -some->> (x &optional form &rest more)
   "When expr is non-nil, thread it through the first form (via `->>'),
 and when that result is non-nil, through the next form, etc."
-  (declare (debug ->))
+  (declare (debug ->)
+           (indent 1))
   (if (null form) x
     (let ((result (make-symbol "result")))
       `(-some->> (-when-let (,result ,x)
@@ -1559,7 +1561,8 @@ and when that result is non-nil, through the next form, 
etc."
 (defmacro -some--> (x &optional form &rest more)
   "When expr in non-nil, thread it through the first form (via `-->'),
 and when that result is non-nil, through the next form, etc."
-  (declare (debug ->))
+  (declare (debug ->)
+           (indent 1))
   (if (null form) x
     (let ((result (make-symbol "result")))
       `(-some--> (-when-let (,result ,x)