bug#48294: Use 'with-current-buffer' byte-compiler warning seems wrong

[Eli Zaretskii <eliz@gnu.org>]

tags 48294 notabug
thanks

> From: Robert Weiner <rsw@gnu.org>
> Date: Sat, 8 May 2021 16:14:09 -0400
> 
> I get a lot of these byte-compile warnings in my Elisp code:
> 
> hbut.el:683:26:Warning: Use ‘with-current-buffer’ rather than
>     save-excursion+set-buffer
> 
> but since with-current-buffer does not save the value of point, it is
> not a valid substitute for save-excursion and should not be suggested.
> Evaluate the two samples below and you will see that they are not
> equivalent.  If I am correct, I'd like this suggestion disabled.  Thanks.  -- rsw
> 
> (save-excursion
>   (set-buffer (current-buffer))
>   (forward-char 20))
> 
> (with-current-buffer (current-buffer)
>   (forward-char 20))

The ELisp manual says about this:

     Because ‘save-excursion’ only saves point for the buffer that was
  current at the start of the excursion, any changes made to point in
  other buffers, during the excursion, will remain in effect afterward.
  This frequently leads to unintended consequences, so the byte compiler
  warns if you call ‘set-buffer’ during an excursion:

       Warning: Use ‘with-current-buffer’ rather than
		save-excursion+set-buffer

  To avoid such problems, you should call ‘save-excursion’ only after
  setting the desired current buffer, as in the following example:

       (defun append-string-to-buffer (string buffer)
	 "Append STRING to the end of BUFFER."
	 (with-current-buffer buffer
	   (save-excursion
	     (goto-char (point-max))
	     (insert string))))

I believe this example shows how to solve your problem.