progn translation uses ',' Javascript operator
[jscl.git] / src / package.lisp
index 834a95a..b74fbaa 100644 (file)
 
 (defun find-all-symbols (string)
   (let (symbols)
-    (dolist (package *package-list*)
+    (dolist (package *package-list* symbols)
       (multiple-value-bind (symbol status) (find-symbol string package)
         (when status
           (pushnew symbol symbols :test #'eq))))))