changeset 45366:c9338efa3fd9

(custom-load-symbol): Verify that LOADED is a string.
author Richard M. Stallman <rms@gnu.org>
date Sun, 19 May 2002 16:07:13 +0000
parents 82749144e314
children 2a9743cfbeab
files lisp/custom.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/custom.el	Sun May 19 16:05:46 2002 +0000
+++ b/lisp/custom.el	Sun May 19 16:07:13 2002 +0000
@@ -485,7 +485,8 @@
 	      ;; if not necessary.
 	      ((let (found (regexp (regexp-quote load)))
 		 (dolist (loaded load-history)
-		   (and (string-match regexp (car loaded))
+		   (and (stringp (car loaded))
+			(string-match regexp (car loaded))
 			(eq (locate-library load) (car loaded))
 			(setq found t)))
 		 found))