[mcclim-cvs] CVS mcclim/Apps/Listener

[ahefner]

Update of /project/mcclim/cvsroot/mcclim/Apps/Listener
In directory clnet:/tmp/cvs-serv25429

Modified Files:
	wholine.lisp 
Log Message:
Detect changed package name.


--- /project/mcclim/cvsroot/mcclim/Apps/Listener/wholine.lisp	2008/01/06 01:33:25	1.3
+++ /project/mcclim/cvsroot/mcclim/Apps/Listener/wholine.lisp	2008/01/31 08:46:44	1.4
@@ -83,7 +83,7 @@
          ;; But :small looks awful using freetype, perhaps because the
          ;; fonts are, for whatever reason, slightly smaller.
          ;; Very distressing.
-         (text-size (if (find-package :mcclim-freetype) :normal :small))
+         (text-size (if (find-package :mcclim-truetype) :normal :small))
          (memusage #+(or cmu scl) (lisp::dynamic-usage)
                    #+sbcl  (sb-kernel:dynamic-usage)
                    #+lispworks (getf (system:room-values) :total-allocated)