[movitz-cvs] CVS update: movitz/losp/muerte/packages.lisp

[Frode Vatvedt Fjeld]

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 at 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))