Lines Matching defs:section
41 A `.el' file can set this in its local variables section to make its
59 (defconst generate-autoload-section-header "\f\n;;;### "
60 "String that marks the form at the start of a new file's autoload section.")
62 (defconst generate-autoload-section-trailer "\n;;;***\n"
63 "String which indicates the end of the section of autoloads for a file.")
65 (defconst generate-autoload-section-continuation ";;;;;; "
66 "String to add on each continuation of the section header form.")
163 (defun autoload-read-section-header ()
164 "Read a section header form.
172 (while (looking-at generate-autoload-section-continuation)
179 (while (search-forward generate-autoload-section-continuation nil t)
253 (defun autoload-insert-section-header (outbuf autoloads load-name file time)
254 "Insert the section-header line,
256 (insert generate-autoload-section-header)
271 (insert "\n" generate-autoload-section-continuation))))))
291 "Insert at point a loaddefs autoload section for FILE.
311 ;; If the autoload section we create here uses an absolute
377 ;; Insert the section-header line which lists the file name
380 (autoload-insert-section-header
385 (insert generate-autoload-section-trailer)))
411 ;; the local variables section if it's there.
433 ;; Look for the section for LOAD-NAME.
435 (search-forward generate-autoload-section-header nil t))
436 (let ((form (autoload-read-section-header)))
438 ;; We found the section for this file.
450 Autoload section for %s is up to date."
453 (search-forward generate-autoload-section-trailer)
457 ;; We've come to a section alphabetically later than
459 ;; there must be no section for LOAD-NAME. We will
460 ;; insert one before the section here.
477 (defun autoload-remove-section (begin)
479 (search-forward generate-autoload-section-trailer)
519 (while (search-forward generate-autoload-section-header nil t)
520 (let* ((form (autoload-read-section-header))
525 ;; Remove the obsolete section.
526 (autoload-remove-section (match-beginning 0))
537 ;; Remove the obsolete section.
538 (autoload-remove-section (match-beginning 0)))
552 ;; Add the `no-autoloads' section.
555 (autoload-insert-section-header
557 (insert generate-autoload-section-trailer))