(unload-feature): Ignore conses in the feature-symbols.

67fc28a7 · Richard M. Stallman · b0f86743 · 67fc28a7
Commit 67fc28a7 authored Dec 24, 1993 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 0 deletions

lisp/loadhist.el lisp/loadhist.el +1 -0

No files found.
--- a/lisp/loadhist.el
+++ b/lisp/loadhist.el
@@ -99,6 +99,7 @@ is nil, raise an error."
    (mapcar
     (function (lambda (x) 
 		 (cond ((stringp x) nil)
+		       ((consp x) nil)
 		       ((boundp x) (makunbound x))
 		       ((fboundp x)
 			(fmakunbound x)