bug#81614: 30.2; quit-window unexpectedly changes the width of window

 > I have tested the patch and it fixes the reproducer, thanks a lot for that.
 > I don't think it is urgent to fix it. For now I have hacked around this
 > in my init.el by
 >
 > (add-hook 'quit-window-hook
 >              (defun +quit-prevent-horizontal-resize ()
 >                (let ((window (get-buffer-window)))
 >                  (unless (window-combined-p window)
 >                    (when-let* ((qr (nth 1 (window-parameter window 'quit-restore)))
 >                                ((consp qr)))
 >                      (setf (nth 3 qr) nil))))))
 >
 > which isn't perfect but works for scenarios in which I discovered the
 > problem so good enough in the short term.

I pushed it to master to avoid spoiling the release process.

 > I think the ability to restore width can be useful for e.g. displaying a
 > temporary buffer that have lines at most 80 columns wide.

In fact I do that with *info* manuals, displaying them at the right of
my frame - one of the few occasions where I call 'display-buffer'.

martin