branch: externals/dash
commit 38cc9e7af830a29a84252a500cc73234d633087d
Author: Magnar Sveen <[email protected]>
Commit: Magnar Sveen <[email protected]>

    Simplify -interleave with -none?
---
 dash.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/dash.el b/dash.el
index 1d6a8ef..c946d38 100644
--- a/dash.el
+++ b/dash.el
@@ -278,7 +278,7 @@ Alias: `-every?'"
 (defun -interleave (&rest lists)
   "Returns a new list of the first item in each list, then the second etc."
   (let (result)
-    (while (--all? (not (null it)) lists)
+    (while (-none? 'null lists)
       (--each lists (setq result (cons (car it) result)))
       (setq lists (-map 'cdr lists)))
     (nreverse result)))

Reply via email to