Update of /project/mcclim/cvsroot/mcclim/Examples In directory clnet:/tmp/cvs-serv6896

Modified Files: logic-cube.lisp Log Message: Use text size of :huge, since not all X servers supply a reasonable font at size 50.

--- /project/mcclim/cvsroot/mcclim/Examples/logic-cube.lisp 2006/07/03 04:58:41 1.1 +++ /project/mcclim/cvsroot/mcclim/Examples/logic-cube.lisp 2006/07/08 18:27:10 1.2 @@ -390,7 +390,7 @@ (defun won-logic-cube (pane) (let ((start-time (get-internal-real-time)) (spin-start-time 0.3) - (text-style (make-text-style :serif :bold 50)) + (text-style (make-text-style :serif :bold :huge)) (start-yaw (yaw pane)) (win-message (elt '("Great Success!" "You Win!" "Completed!" "Vanquished!" "Terminated!" "Good job!" "Boom!")