bug#63236: 29.0.90; loaddefs-generate not 100% backwards compatible

[Andreas Schwab]

On Mai 03 2023, Robert Pluim wrote:

> diff --git a/lisp/emacs-lisp/loaddefs-gen.el b/lisp/emacs-lisp/loaddefs-gen.el
> index a966b1e9f40..c25950a1afd 100644
> --- a/lisp/emacs-lisp/loaddefs-gen.el
> +++ b/lisp/emacs-lisp/loaddefs-gen.el
> @@ -637,7 +637,7 @@ loaddefs-generate
>                        (search-backward "\f\n" nil t))
>                    ;; Delete the old version of the section.
>                    (delete-region (match-beginning 0)
> -                                 (and (search-forward "\n\f\n;;;")
> +                                 (and (re-search-forward "\n\f\n;;;?")

This is equivalent to (search-forward "\n\f\n;;").

>                                        (match-beginning 0)))

-- 
Andreas Schwab, SUSE Labs, schwab@suse.de
GPG Key fingerprint = 0196 BAD8 1CE9 1970 F4BE  1748 E4D4 88E3 0EEA B9D7
"And now for something completely different."