summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2022-07-11 22:32:36 +0200
committerStefan Kangas <stefan@marxist.se>2022-07-11 22:32:36 +0200
commit93727d243a39890d8ccbe39854a69bf24e149256 (patch)
treee37a2c7e4124dc78ba168b83975ffa49d1608328 /lisp/mail
parent9fe663530c56d3c952e5f3c709d57301c3c076e9 (diff)
downloademacs-93727d243a39890d8ccbe39854a69bf24e149256.tar.gz
emacs-93727d243a39890d8ccbe39854a69bf24e149256.tar.bz2
emacs-93727d243a39890d8ccbe39854a69bf24e149256.zip
* lisp/mail/mail-utils.el (mail-string-delete): Make obsolete.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/mail-utils.el2
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))))