[elpa] externals/dash fae51b5 147/316: Make -inits not destroy its argument

[ELPA Syncer]

branch: externals/dash
commit fae51b589ba761500bb0e478ddc24589e86ca4cb
Author: Zach Shaftel <zshaftel@gmail.com>
Commit: Zach Shaftel <zshaftel@gmail.com>

    Make -inits not destroy its argument
---
 dash.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/dash.el b/dash.el
index f48c517..dbdc733 100644
--- a/dash.el
+++ b/dash.el
@@ -2342,7 +2342,12 @@ or with `-compare-fn' if that's non-nil."
 
 (defun -inits (list)
   "Return all prefixes of LIST."
-  (nreverse (-map 'reverse (-tails (nreverse list)))))
+  (let ((acc nil)
+        (ret (list nil)))
+    (--each list
+      (!cons it acc)
+      (!cons (reverse acc) ret))
+    (nreverse ret)))
 
 (defun -tails (list)
   "Return all suffixes of LIST"