Fix apropos-documentation with universal argument

* lisp/apropos.el (apropos-documentation-check-elc-file): Look up
.elc files in the load path (and don't bug out on deleted .elc
files) (bug#55492).

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 9970667179224c976486c090f63d71df57028473..428aeb15412784e11e790335b08b94f982c30af2 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -1055,7 +1055,10 @@ non-nil."
       (setq sepa (goto-char sepb)))))
 
 (defun apropos-documentation-check-elc-file (file)
-  (if (member file apropos-files-scanned)
+  (unless (file-name-absolute-p file)
+    (setq file (locate-library file)))
+  (if (or (member file apropos-files-scanned)
+          (not (file-exists-p file)))
       nil
     (let (symbol doc beg end this-is-a-variable)
       (setq apropos-files-scanned (cons file apropos-files-scanned))