From: Stefan Kangas <stefankangas@gmail.com>
Date: Thu, 18 Aug 2022 21:47:47 +0000 (+0200)
Subject: Improve obsoletion of image-transform-fit-to-{height,width}
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~1886^2~59
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=f1f2bbbc0880f1033feff69fa786d551875ec5e6;p=emacs.git

Improve obsoletion of image-transform-fit-to-{height,width}

* lisp/image-mode.el (image-transform-fit-to-height)
(image-transform-fit-to-width): Change obsoletion to refer to new
command 'image-transform-fit-to-window'.
---

diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index 9646d8e4c3d..1f4ade6e02e 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -1554,14 +1554,14 @@ The percentage is in relation to the original size of the image."
 
 (defun image-transform-fit-to-height ()
   "Fit the current image to the height of the current window."
-  (declare (obsolete nil "29.1"))
+  (declare (obsolete image-transform-fit-to-window "29.1"))
   (interactive nil image-mode)
   (setq image-transform-resize 'fit-height)
   (image-toggle-display-image))
 
 (defun image-transform-fit-to-width ()
   "Fit the current image to the width of the current window."
-  (declare (obsolete nil "29.1"))
+  (declare (obsolete image-transform-fit-to-window "29.1"))
   (interactive nil image-mode)
   (setq image-transform-resize 'fit-width)
   (image-toggle-display-image))