Re: master 32ded573cc4: ; Fix bootstrap

[Stefan Kangas]

Robert Pluim <rpluim@gmail.com> writes:

>>>>>> On Wed, 13 Sep 2023 12:28:06 -0400 (EDT), Stefan Kangas 
>>>>>> <stefankangas@gmail.com> said:
>
>     Stefan> branch: master
>     Stefan> commit 32ded573cc4a58546ad60b44f454ba86c80a929d
>     Stefan> Author: Stefan Kangas <stefankangas@gmail.com>
>     Stefan> Commit: Stefan Kangas <stefankangas@gmail.com>
>
>     Stefan>     ; Fix bootstrap
>
>     Stefan>     * lisp/emacs-lisp/cl-macs.el (cl-defstruct): Don't use void 
> variable.
>     Stefan> ---
>     Stefan>  lisp/emacs-lisp/cl-macs.el | 5 ++++-
>     Stefan>  1 file changed, 4 insertions(+), 1 deletion(-)
>
>     Stefan> diff --git a/lisp/emacs-lisp/cl-macs.el 
> b/lisp/emacs-lisp/cl-macs.el
>     Stefan> index ef00f9e4fe4..7c207d372fc 100644
>     Stefan> --- a/lisp/emacs-lisp/cl-macs.el
>     Stefan> +++ b/lisp/emacs-lisp/cl-macs.el
>     Stefan> @@ -3199,7 +3199,10 @@ To see the documentation for a defined 
> struct type, use
>     Stefan>                             ;; can't have a perfect result here, 
> and
>     Stefan>                             ;; choose to avoid the byte-compiler
>     Stefan>                             ;; warnings.
>     Stefan> -                           (if (>= (length long-docstring) 
> byte-compile-docstring-max-column)
>     Stefan> +                           (if (>= (length long-docstring)
>     Stefan> +                                   (or (and (boundp 
> 'byte-compile-docstring-max-column)
>     Stefan> +                                            
> byte-compile-docstring-max-column)
>     Stefan> +                                       80))
>     Stefan>                                 (concat
>     Stefan>                                  (internal--format-docstring-line
>     Stefan>                                   "Access slot \"%s\" of CL-X." 
> slot)
>
> Is `bound-and-true-p' available there?

It turns out that the answer is "yes", so I changed it to use that.

Thanks.