* lisp/mail/mail-utils.el (mail-string-delete): Make obsolete.

diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el
index 9ea2cc92e94ca7553faa553483a98ab0843f7dea..63752f953a79ed9e89a0c532da8ae51c14071531 100644 (file)
--- 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))))