From 7d7c996aa723a9c99d8ceeecc7891a7049e69c98 Mon Sep 17 00:00:00 2001
From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Fri, 14 Nov 2014 23:58:05 +0000
Subject: Quick-fix assoc-let

---
 sx.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'sx.el')

diff --git a/sx.el b/sx.el
index 7ed56d3..796a5d6 100644
--- a/sx.el
+++ b/sx.el
@@ -106,7 +106,7 @@ is equivalent to
            (debug t))
   (let ((symbol-alist (sx--deep-dot-search body)))
     `(let ,(mapcar (lambda (x) `(,(car x) (cdr (assoc ',(cdr x) ,alist))))
-                   symbol-alist)
+                   (delete-dups symbol-alist))
        ,@body)))
 
 (defcustom sx-init-hook nil
-- 
cgit v1.2.3