dot/ercrc.el: Avoid duplicates in `mdw-erc-auto-greet-bots-alist'.

Use `pushnew' instead of `push' here.  Otherwise we end up greeting bots
multiple times.

diff --git a/dot/ercrc.el b/dot/ercrc.el
index 525368da74e4c3d032c04b017b54636f8402c6d9..cdf436e0f255b1eada7862a143ba7d3e62b2b4c8 100644 (file)
--- a/dot/ercrc.el
+++ b/dot/ercrc.el
@@ -44,7 +44,8 @@ (defvar mdw-erc-auto-greet-bots-alist nil
 
 (defun mdw-define-bot-greeting (server bot greeting)
   "Define a new bot greeting."
 
 (defun mdw-define-bot-greeting (server bot greeting)
   "Define a new bot greeting."

-  (push (list server bot greeting) mdw-erc-auto-greet-bots-alist))
+  (pushnew (list server bot greeting) mdw-erc-auto-greet-bots-alist
+          :test #'string= :key #'car))

 (load "~/.erc-auth.el")
 
 (defun mdw-erc-auto-greet-bots (server nick)
 (load "~/.erc-auth.el")
 
 (defun mdw-erc-auto-greet-bots (server nick)