Update of /project/movitz/cvsroot/movitz/losp/muerte In directory common-lisp.net:/tmp/cvs-serv26264
Modified Files: packages.lisp Log Message: ignore k.
Date: Thu Sep 1 00:32:08 2005 Author: ffjeld
Index: movitz/losp/muerte/packages.lisp diff -u movitz/losp/muerte/packages.lisp:1.11 movitz/losp/muerte/packages.lisp:1.12 --- movitz/losp/muerte/packages.lisp:1.11 Wed Aug 24 09:29:40 2005 +++ movitz/losp/muerte/packages.lisp Thu Sep 1 00:32:08 2005 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld frodef@acm.org ;;;; Created at: Thu Aug 30 15:19:43 2001 ;;;; -;;;; $Id: packages.lisp,v 1.11 2005/08/24 07:29:40 ffjeld Exp $ +;;;; $Id: packages.lisp,v 1.12 2005/08/31 22:32:08 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------
@@ -55,6 +55,7 @@ (defun list-all-packages () (let (pkgs) (maphash (lambda (k v) + (declare (ignore k)) (pushnew v pkgs)) *packages*) pkgs))