summaryrefslogtreecommitdiff
path: root/lisp/erc/erc-notify.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2020-08-12 19:32:52 +0200
committerAmin Bandali <bandali@gnu.org>2020-08-13 19:31:54 -0400
commit32cb84974faac7cecdd82e154f7cae9ac0ee8320 (patch)
treeca64ae597f9d0f3d0d70baaede2463c637f603bf /lisp/erc/erc-notify.el
parent48c7caf3aca85f9878ae05bff9a0dca43b8f540b (diff)
downloademacs-32cb84974faac7cecdd82e154f7cae9ac0ee8320.tar.gz
emacs-32cb84974faac7cecdd82e154f7cae9ac0ee8320.tar.bz2
emacs-32cb84974faac7cecdd82e154f7cae9ac0ee8320.zip
Make erc-compat.el obsolete
* lisp/erc/erc-compat.el: Move from here... * lisp/obsolete/erc-compat.el: ...to here. * lisp/erc/erc-backend.el: * lisp/erc/erc-pcomplete.el: * lisp/erc/erc-stamp.el: * lisp/erc/erc-track.el: * lisp/erc/erc.el: Don't require 'erc-compat'. * lisp/erc/erc-backend.el (erc-decode-string-from-target): * lisp/erc/erc-dcc.el (pcomplete/erc-mode/DCC): * lisp/erc/erc-fill.el (erc-fill-mode): * lisp/erc/erc-goodies.el (erc-controls-interpret): * lisp/erc/erc-log.el (erc-log-setup-logging): * lisp/erc/erc-notify.el (erc-notify-QUIT): * lisp/erc/erc.el (erc-startup-file-list, define-erc-module) (erc-canonicalize-server-name, erc-cmd-SV, erc-banlist-update) (erc-group-list, erc-seconds-to-string): Adjust callers. * lisp/erc/erc.el: Require cl-lib and format-spec. * etc/NEWS: Add entry announcing erc-compat.el being marked as obsolete.
Diffstat (limited to 'lisp/erc/erc-notify.el')
-rw-r--r--lisp/erc/erc-notify.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/erc/erc-notify.el b/lisp/erc/erc-notify.el
index 1b092c8a6a9..144a981f832 100644
--- a/lisp/erc/erc-notify.el
+++ b/lisp/erc/erc-notify.el
@@ -181,7 +181,7 @@ nick from `erc-last-ison' to prevent any further notifications."
(let ((nick (erc-extract-nick (erc-response.sender parsed))))
(when (and (erc-member-ignore-case nick erc-notify-list)
(erc-member-ignore-case nick erc-last-ison))
- (setq erc-last-ison (erc-delete-if
+ (setq erc-last-ison (cl-delete-if
(let ((nick-down (erc-downcase nick)))
(lambda (el)
(string= nick-down (erc-downcase el))))