class: ListView
authorClaus Gittinger <cg@exept.de>
Fri, 26 Apr 2013 15:28:11 +0200
changeset 4577 3230a2dcbd49
parent 4576 c9d937d20173
child 4578 9a81e7074007
class: ListView changed: #initStyle
ListView.st
--- a/ListView.st	Fri Apr 26 15:28:01 2013 +0200
+++ b/ListView.st	Fri Apr 26 15:28:11 2013 +0200
@@ -2220,6 +2220,11 @@
     self leftMargin:n.
 
     lineSpacing := 2.
+    "/ q&d temporary hack.
+    "/ X11 fonts are currently so ugly... add more spacing.
+    Display platformName = #X11 ifTrue:[
+        lineSpacing := lineSpacing + 3.
+    ].
     fgColor := DefaultForegroundColor.
     bgColor := DefaultBackgroundColor.
 
@@ -4863,10 +4868,10 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.362 2013-04-26 12:57:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.363 2013-04-26 13:28:11 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.362 2013-04-26 12:57:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.363 2013-04-26 13:28:11 cg Exp $'
 ! !