[elpa] externals/async 57f5d81 06/60: Allow passing multiple forms to async-let

[Stefan Monnier]

branch: externals/async
commit 57f5d816c1b0dd7ae181763ad548da0284f3c45b
Author: Thierry Volpiatto <address@hidden>
Commit: Thierry Volpiatto <address@hidden>

    Allow passing multiple forms to async-let
    
    without wrapping forms in a progn.
    
    * async.el (async-let): Do it.
---
 async.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/async.el b/async.el
index 8bfd62d..c7dabe2 100644
--- a/async.el
+++ b/async.el
@@ -304,7 +304,7 @@ returns nil.  It can still be useful, however, as an 
argument to
       (setq res (funcall f res x)))
     res))
 
-(defmacro async-let (bindings forms)
+(defmacro async-let (bindings &rest forms)
   "Implements `let', but each binding is established asynchronously.
 For example:
 
@@ -328,7 +328,7 @@ For example:
        `(async-start ,fun
                      (lambda (,(car binding))
                        ,acc))))
-   forms
+   `(progn ,@forms)
    (reverse bindings)))
 
 (provide 'async)