Re: string-to-unibyte in image-jpeg-p

[Robert Pluim]

Stefan Monnier <address@hidden> writes:

>> +(make-obsolete 'image-jpeg-p nil "27.1")
>
> Nowadays I'd recommend the use of (declare (obsolete nil "27.1"))

That does feel more natural. Updated patch.

>From 048c2ec89a9053ad1dfe0fef3bd4c7154fb5db73 Mon Sep 17 00:00:00 2001
From: Robert Pluim <address@hidden>
Date: Thu, 24 May 2018 17:28:11 +0200
Subject: [PATCH] Obsolete image-jpeg-p
To: address@hidden

* lisp/image.el (image-jpeg-p): Declare obsolete.
---
 lisp/image.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/image.el b/lisp/image.el
index e084fe329a..8d12b680ea 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -248,6 +248,7 @@ image-load-path-for-library
 ;; Used to be in image-type-header-regexps, but now not used anywhere
 ;; (since 2009-08-28).
 (defun image-jpeg-p (data)
+  (declare (obsolete "It is unused inside Emacs and will be removed." "27.1"))
   "Value is non-nil if DATA, a string, consists of JFIF image data.
 We accept the tag Exif because that is the same format."
   (setq data (ignore-errors (string-to-unibyte data)))
-- 
2.17.0.775.ge144d126d7