[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/dash a7ee06e 149/439: Remove extra --separate definitio

From: Phillip Lord
Subject: [elpa] externals/dash a7ee06e 149/439: Remove extra --separate definition
Date: Tue, 04 Aug 2015 20:27:19 +0000

branch: externals/dash
commit a7ee06e51391346fd96990425ab2642a42f1b9ce
Author: Magnar Sveen <address@hidden>
Commit: Magnar Sveen <address@hidden>

    Remove extra --separate definition
 dash.el |    8 --------
 1 files changed, 0 insertions(+), 8 deletions(-)

diff --git a/dash.el b/dash.el
index 483170d..5694e13 100644
--- a/dash.el
+++ b/dash.el
@@ -490,14 +490,6 @@ elements of LIST.  Keys are compared by `equal'."
       (setq lists (-map 'cdr lists)))
     (nreverse result)))
-(defmacro --separate (form list)
-  "Anaphoric form of `-separate'."
-  (let ((y (make-symbol "yes"))
-        (n (make-symbol "no")))
-    `(let (,y ,n)
-       (--each ,list (if ,form (!cons it ,y) (!cons it ,n)))
-       (list (nreverse ,y) (nreverse ,n)))))
 (defmacro --zip-with (form list1 list2)
   "Anaphoric form of `-zip-with'.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]