(pcomplete-erc-all-nicks): Autoload it, to silence compiler.

(pcomplete/erc-mode/DCC): Replace cl-function remove-duplicates with
erc-delete-dups.
This commit is contained in:
Glenn Morris 2009-10-24 03:54:50 +00:00
parent ae73233745
commit 595521d74c

View file

@ -426,6 +426,8 @@ where FOO is one of CLOSE, GET, SEND, LIST, CHAT, etc."
(apropos "erc-dcc-do-.*-command")
t))))
(autoload 'pcomplete-erc-all-nicks "erc-pcomplete")
;;;###autoload
(defun pcomplete/erc-mode/DCC ()
"Provides completion for the /DCC command."
@ -438,9 +440,9 @@ where FOO is one of CLOSE, GET, SEND, LIST, CHAT, etc."
#'(lambda (elt)
(eq (plist-get elt :type) 'CHAT))
erc-dcc-list)))
(close (remove-duplicates
(close (erc-delete-dups
(mapcar (lambda (elt) (symbol-name (plist-get elt :type)))
erc-dcc-list) :test 'string=))
erc-dcc-list)))
(get (mapcar #'erc-dcc-nick
(erc-remove-if-not
#'(lambda (elt)