diff --git a/code/package.lisp b/code/package.lisp index 5fc4bed1a0ca7f671d0b53b33d6f023468e01664..9d13464bf307a25f23c201950adf403851982945 100644 --- a/code/package.lisp +++ b/code/package.lisp @@ -1180,7 +1180,8 @@ not already present." (let* ((package (package-or-lose package)) (internal (package-internal-symbols package))) - (dolist (name (mapcar #'string symbols)) + (dolist (name (mapcar #'string + (if (consp symbols) symbols (list symbols)))) (multiple-value-bind (s w) (find-symbol name package) (when (or (not w) (eq w :inherited)) (setq s (make-symbol name))