ListView.st
changeset 776 007d1d3463cf
parent 770 a41466e3dfaa
child 780 48f97576806f
--- a/ListView.st	Fri Jul 05 15:03:15 1996 +0200
+++ b/ListView.st	Fri Jul 05 16:44:43 1996 +0200
@@ -23,7 +23,7 @@
 	category:'Views-Text'
 !
 
-!ListView class methodsFor:'documentation'!
+!ListView  class methodsFor:'documentation'!
 
 copyright
 "
@@ -315,7 +315,7 @@
 "
 ! !
 
-!ListView class methodsFor:'defaults'!
+!ListView  class methodsFor:'defaults'!
 
 defaultTabPositions
     ^ self tab8Positions
@@ -2100,7 +2100,7 @@
 
     device isNil ifTrue:[
         "/ mhmh - really dont know yet
-        f := font on:Display
+        f := font on:Screen current
     ] ifFalse:[
         f := font := font on:device.
     ].
@@ -2139,7 +2139,7 @@
     widthOfWidestLine := max.
     ^ max + (leftMargin * 2)
 
-    "Modified: 22.5.1996 / 15:48:01 / cg"
+    "Modified: 5.7.1996 / 13:54:01 / cg"
 !
 
 xOriginOfContents
@@ -3259,8 +3259,8 @@
     ^ self withTabs:tabPositions expand:line
 ! !
 
-!ListView class methodsFor:'documentation'!
+!ListView  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.95 1996-06-30 10:37:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.96 1996-07-05 14:44:43 cg Exp $'
 ! !