Index: Apps/Listener/listener.lisp
===================================================================
RCS file: /project/mcclim/cvsroot/mcclim/Apps/Listener/listener.lisp,v
retrieving revision 1.23
diff -u -r1.23 listener.lisp
--- Apps/Listener/listener.lisp	15 Mar 2006 22:56:54 -0000	1.23
+++ Apps/Listener/listener.lisp	20 Mar 2006 11:11:57 -0000
@@ -78,7 +78,7 @@
 		       #-(or allegro cmu scl) (getenv "USER")
                        "luser"))  ; sorry..
          (sitename (machine-instance))
-         (memusage #+(or cmu scl) (lisp::dynamic-space-usage)
+         (memusage #+(or cmu scl) (lisp::dynamic-usage)
                    #+sbcl  (sb-kernel:dynamic-usage)
                    #+lispworks (getf (system:room-values) :total-allocated)
 		   #+openmcl (+ (ccl::%usedbytes) (ccl::%freebytes))
