Load documentation at startup.

Documentation pointers for Lisp subrs are currently only loadable via
Snarf-documentation.

* lisp/loadup.el: Make dumped.elc attempt to reload the DOC file.
Warn but continue if it fails.

diff --git a/lisp/loadup.el b/lisp/loadup.el
index 188446ab129712ddde79fd8167b5961dbd786256..956ee790bea54916c2fa27c603937cefe339450d 100644 (file)
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -634,6 +634,13 @@ lost after dumping")))
             (terpri)
             (print '(load "international/characters" nil t))
             (terpri)
+            ;; Lisp functions have their DOC file offsets stored
+            ;; already, but for a subr it's hidden away from Lisp.
+            (print '(condition-case nil
+                        (Snarf-documentation "DOC")
+                      (file-missing
+                       (message "Couldn't load DOC file"))))
+            (terpri)
             (print `(dolist (cs ',coding-system-aliases)
                       (define-coding-system-alias (car cs) (cdr cs))))
             (terpri)