From 84fc911dcc037ad75a3aeaf12d2fbcf1f1df648b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 28 Feb 2014 19:54:47 -0800 Subject: [PATCH] * lisp/subr.el (with-wrapper-hook): Tweak obsolescence message. * lisp/simple.el: Remove mistaken FIXME comment. * etc/NEWS: Markup. --- etc/NEWS | 1 + lisp/simple.el | 1 - lisp/subr.el | 2 +- 3 files changed, 2 insertions(+), 2 deletions(-) diff --git a/etc/NEWS b/etc/NEWS index 157a505bfd6..b317d2be606 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -1295,6 +1295,7 @@ This is like the old `eval-after-load', but better behaved. *** `generic-make-keywords-list' *** `get-upcase-table' (use `case-table-get-table' instead). ++++ ** `with-wrapper-hook' is obsoleted by `add-function'. The few hooks that used with-wrapper-hook are replaced as follows: *** `abbrev-expand-function' obsoletes `abbrev-expand-functions'. diff --git a/lisp/simple.el b/lisp/simple.el index 85a7476dbe0..bf8b6a75ac7 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3468,7 +3468,6 @@ extract characters that are special to a buffer, and should not be copied into other buffers." (funcall filter-buffer-substring-function beg end delete)) -;; FIXME: `with-wrapper-hook' is obsolete (defun buffer-substring--filter (beg end &optional delete) (with-wrapper-hook filter-buffer-substring-functions (beg end delete) (cond diff --git a/lisp/subr.el b/lisp/subr.el index 1bfa3c83a35..e4350bffff8 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1461,7 +1461,7 @@ Each hook function definition is used to construct the FUN passed to the next hook function, if any. The last (or \"outermost\") FUN is then called once." (declare (indent 2) (debug (form sexp body)) - (obsolete "use a -function variable modified by add-function." + (obsolete "use a -function variable modified by `add-function'." "24.4")) ;; We need those two gensyms because CL's lexical scoping is not available ;; for function arguments :-( -- 2.39.2