Avoid errors in 'apropos-documentation' after 'eval-buffer'

* lisp/apropos.el (apropos--map-preloaded-atoms): Support the case
where an element of 'load-history' has nil as its car.  (Bug#63881)

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 5d7fe6962a5a0a9117cdbd0ae882f39cf461bb7f..c9551b06529f83bf0980bbccb0b82c3181f2f145 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -900,7 +900,8 @@ Optional arg BUFFER (default: current buffer) is the buffer to check."
     ;; state of the `obarray' when we dumped, which we may also be able to
     ;; use in `bytecomp' to provide a clean initial environment?)
     (dolist (x load-history)
-      (when (string-match preloaded-regexp (car x))
+      (when (let ((elt (car x)))
+              (and (stringp elt) (string-match preloaded-regexp elt)))
         (dolist (def (cdr x))
           (cond
            ((symbolp def) (funcall f def))