DSVColumnView.st
changeset 4496 229bdd6b4754
parent 4489 e492b99bfa39
child 4521 727d661f5e8e
--- a/DSVColumnView.st	Thu Feb 13 19:28:14 2014 +0100
+++ b/DSVColumnView.st	Thu Feb 13 19:30:15 2014 +0100
@@ -2014,7 +2014,7 @@
     shown ifFalse:[^ self].
     self isReallyShown ifFalse:[^ self].
 
-    font := font onDevice:self device.
+    self createFontOnDevice.
     self paint:bgColor.
 
     columnDescriptors isEmpty ifTrue:[
@@ -4311,7 +4311,7 @@
     editView 
         withAllSubViewsDo:[:aView | 
             aView delegate:keyBrdFwd.
-            aView font:font.
+            aView font:self font.
         ].
 
     (editValue := editorAndModel model) notNil ifTrue:[
@@ -4780,10 +4780,10 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.292 2014-02-13 11:23:28 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.293 2014-02-13 18:30:15 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.292 2014-02-13 11:23:28 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.293 2014-02-13 18:30:15 stefan Exp $'
 ! !