X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/faa3255614fbe4a3e5780cc482640cafba59da43..97103d53feb0e65e8cda1a3c8b8832e18692dd4a:/dot/ercrc.el?ds=sidebyside diff --git a/dot/ercrc.el b/dot/ercrc.el index 30da860..5b573e0 100644 --- a/dot/ercrc.el +++ b/dot/ercrc.el @@ -12,7 +12,6 @@ erc-timestamp-right-column 68 erc-fill-prefix " " erc-max-buffer-size (* 60 3000)) -(erc-scrolltobottom-enable) (load "~/.erc-local.el") @@ -45,7 +44,10 @@ matches SERVER-REGEXP.") (defun mdw-define-bot-greeting (server bot greeting) "Define a new bot greeting." - (push (list server bot greeting) mdw-erc-auto-greet-bots-alist)) + (setq mdw-erc-auto-greet-bots-alist + (cons (list server bot greeting) + (remove* server mdw-erc-auto-greet-bots-alist + :test #'string= :key #'car)))) (load "~/.erc-auth.el") (defun mdw-erc-auto-greet-bots (server nick)