Update of /project/closure/cvsroot/closure/src/renderer In directory common-lisp.net:/tmp/cvs-serv24112/src/renderer
Modified Files: clim-device.lisp Log Message: Believe it or not, the clim text style family is :fix, not :fixed. Make it so.
Date: Mon Jun 20 17:37:33 2005 Author: crhodes
Index: closure/src/renderer/clim-device.lisp diff -u closure/src/renderer/clim-device.lisp:1.9 closure/src/renderer/clim-device.lisp:1.10 --- closure/src/renderer/clim-device.lisp:1.9 Sun Mar 13 22:15:09 2005 +++ closure/src/renderer/clim-device.lisp Mon Jun 20 17:37:33 2005 @@ -82,7 +82,7 @@ :device self))) (loop for family in '("Times" "Helvetica" "Courier") - for clim-family in '(:serif :sans-serif :fixed) + for clim-family in '(:serif :sans-serif :fix) for size-adjust in '(-2 -2 -2) do (loop for weight+style in '((400 :normal) (400 :italic) (700 :normal) (700 :italic)) @@ -127,7 +127,7 @@ :device self))) (loop for family in '("Times" "Helvetica" "Courier") - for clim-family in '(:serif :sans-serif :fixed) + for clim-family in '(:serif :sans-serif :fix) for size-adjust in '(-2 0 -2) do (loop for weight+style in '((400 :normal) (400 :italic) (700 :normal) (700 :italic))