diff options
author | Stefan Kangas <stefan@marxist.se> | 2022-07-11 22:32:36 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2022-07-11 22:32:36 +0200 |
commit | 93727d243a39890d8ccbe39854a69bf24e149256 (patch) | |
tree | e37a2c7e4124dc78ba168b83975ffa49d1608328 | |
parent | 9fe663530c56d3c952e5f3c709d57301c3c076e9 (diff) | |
download | emacs-93727d243a39890d8ccbe39854a69bf24e149256.tar.gz emacs-93727d243a39890d8ccbe39854a69bf24e149256.tar.bz2 emacs-93727d243a39890d8ccbe39854a69bf24e149256.zip |
* lisp/mail/mail-utils.el (mail-string-delete): Make obsolete.
-rw-r--r-- | lisp/mail/mail-utils.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el index 9ea2cc92e94..63752f953a7 100644 --- a/lisp/mail/mail-utils.el +++ b/lisp/mail/mail-utils.el @@ -59,7 +59,7 @@ also the To field, unless this would leave an empty To field." (defun mail-string-delete (string start end) "Return a string containing all of STRING except the part from START (inclusive) to END (exclusive)." - ;; FIXME: This is not used anywhere. Make obsolete? + (declare (obsolete substring "29.1")) (if (null end) (substring string 0 start) (concat (substring string 0 start) (substring string end nil)))) |