Update of /project/mcclim/cvsroot/mcclim In directory cl-net:/tmp/cvs-serv24386

Modified Files: medium.lisp Log Message: Change *default-text-style* to a sans-serif face.

--- /project/mcclim/cvsroot/mcclim/medium.lisp 2008/01/21 01:26:42 1.64 +++ /project/mcclim/cvsroot/mcclim/medium.lisp 2009/06/03 20:38:15 1.65 @@ -158,7 +158,7 @@ (equal (text-style-face style1) (text-style-face style2)) (eql (text-style-size style1) (text-style-size style2))))

-(defconstant *default-text-style* (make-text-style :fix :roman :normal)) +(defconstant *default-text-style* (make-text-style :sans-serif :roman :normal)) (defconstant *undefined-text-style* *default-text-style*)

(defconstant *smaller-sizes* '(:huge :very-large :large :normal