diff options
| author | Richard M. Stallman <rms@gnu.org> | 2002-05-19 16:07:13 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2002-05-19 16:07:13 +0000 |
| commit | c38914477798c4a17fd123cee070aa0a6cb11628 (patch) | |
| tree | 327770c24c927cc9e6c941bf4a388b0e79204d81 /lisp/custom.el | |
| parent | 49a8a2f59e38b7cfad5467d41a566cf9310fdcca (diff) | |
| download | emacs-c38914477798c4a17fd123cee070aa0a6cb11628.tar.gz | |
(custom-load-symbol): Verify that LOADED is a string.
Diffstat (limited to 'lisp/custom.el')
| -rw-r--r-- | lisp/custom.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/custom.el b/lisp/custom.el index c12f3bec2e7..9f68eb59e39 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -485,7 +485,8 @@ LOAD should be either a library file name, or a feature name." ;; 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)) |