[mcclim-cvs] CVS mcclim

ahefner ahefner at common-lisp.net
Wed Jun 3 20:38:17 UTC 2009


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





More information about the Mcclim-cvs mailing list