Fix loaddefs generation
* lisp/emacs-lisp/loaddefs-gen.el (loaddefs-generate): Prevent one kind of string match error.
This commit is contained in:
parent
495c93d015
commit
28358db930
1 changed files with 1 additions and 1 deletions
|
@ -568,7 +568,7 @@ If INCLUDE-PACKAGE-VERSION, include package version data."
|
|||
(search-backward "\f\n"))
|
||||
;; Delete the old version of the section.
|
||||
(delete-region (match-beginning 0)
|
||||
(and (search-forward "\n\f\n;;;")
|
||||
(and (search-forward "\n\f\n;;;" nil t)
|
||||
(match-beginning 0)))
|
||||
(forward-line -2)))
|
||||
(insert head)
|
||||
|
|
Loading…
Add table
Reference in a new issue