Update of /project/crypticl/cvsroot/crypticl/src In directory common-lisp.net:/tmp/cvs-serv1773 Modified Files: common.lisp Log Message: Make print-external-symbols work from toplevel in any package as intended. Date: Sat Oct 1 18:34:46 2005 Author: tskogan Index: crypticl/src/common.lisp diff -u crypticl/src/common.lisp:1.3 crypticl/src/common.lisp:1.4 --- crypticl/src/common.lisp:1.3 Thu Nov 25 22:56:52 2004 +++ crypticl/src/common.lisp Sat Oct 1 18:34:44 2005 @@ -13,7 +13,7 @@ (in-package crypticl) (defun print-external-symbols () - (do-external-symbols (symbl *package* nil) + (do-external-symbols (symbl 'crypticl nil) (print symbl))) (defclass Crypto ()