(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:
parent
ae73233745
commit
595521d74c
1 changed files with 4 additions and 2 deletions
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue