[elpa] externals/dash 19fbc24 426/439: Fix anaphoric -spice-list macro

[Phillip Lord]

branch: externals/dash
commit 19fbc24559415a71fafc96812322e7178d437157
Author: Matus Goljer <address@hidden>
Commit: Matus Goljer <address@hidden>

    Fix anaphoric -spice-list macro
---
 dash.el         |    2 +-
 dev/examples.el |    3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/dash.el b/dash.el
index 2c96cf9..fa4057c 100644
--- a/dash.el
+++ b/dash.el
@@ -439,7 +439,7 @@ See also: `-splice-list', `-insert-at'"
 See also: `-splice', `-insert-at'"
   (-splice pred (lambda (_) new-list) list))
 
-(defun --splice-list (pred new-list list)
+(defmacro --splice-list (pred new-list list)
   "Anaphoric form of `-splice-list'."
   `(-splice-list (lambda (it) ,pred) ,new-list ,list))
 
diff --git a/dev/examples.el b/dev/examples.el
index 21e8ba5..cd00df5 100644
--- a/dev/examples.el
+++ b/dev/examples.el
@@ -70,7 +70,8 @@ new list."
 
   (defexamples -splice-list
     (-splice-list 'keywordp '(a b c) '(1 :foo 2)) => '(1 a b c 2)
-    (-splice-list 'keywordp nil '(1 :foo 2)) => '(1 2))
+    (-splice-list 'keywordp nil '(1 :foo 2)) => '(1 2)
+    (--splice-list (keywordp it) '(a b c) '(1 :foo 2)) => '(1 a b c 2))
 
   (defexamples -mapcat
     (-mapcat 'list '(1 2 3)) => '(1 2 3)