all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* Re: master 32ded573cc4: ; Fix bootstrap
       [not found] ` <20230913162806.26E90C04DAF@vcs2.savannah.gnu.org>
@ 2023-09-13 16:39   ` Robert Pluim
  2023-10-01 16:45     ` Stefan Kangas
  0 siblings, 1 reply; 2+ messages in thread
From: Robert Pluim @ 2023-09-13 16:39 UTC (permalink / raw)
  To: emacs-devel; +Cc: Stefan Kangas

>>>>> 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?

Robert
-- 



^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: master 32ded573cc4: ; Fix bootstrap
  2023-09-13 16:39   ` master 32ded573cc4: ; Fix bootstrap Robert Pluim
@ 2023-10-01 16:45     ` Stefan Kangas
  0 siblings, 0 replies; 2+ messages in thread
From: Stefan Kangas @ 2023-10-01 16:45 UTC (permalink / raw)
  To: Robert Pluim, emacs-devel

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.



^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2023-10-01 16:45 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
     [not found] <169462248588.13722.4533539880050641369@vcs2.savannah.gnu.org>
     [not found] ` <20230913162806.26E90C04DAF@vcs2.savannah.gnu.org>
2023-09-13 16:39   ` master 32ded573cc4: ; Fix bootstrap Robert Pluim
2023-10-01 16:45     ` Stefan Kangas

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.