*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Tue, 09 Mar 1999 23:34:03 +0100
changeset 1243 e955dcfe26a2
parent 1242 dcaf3fb826da
child 1244 32bc7c6a1c86
*** empty log message ***
LicenceBox.st
--- a/LicenceBox.st	Tue Mar 09 23:29:30 1999 +0100
+++ b/LicenceBox.st	Tue Mar 09 23:34:03 1999 +0100
@@ -133,14 +133,14 @@
 
     super initialize.
 
-    (Display height < 1024) ifTrue:[
-        (Display height < 768) ifTrue:[
+    (Display height < 800) ifTrue:[
+	(Display height < 500) ifTrue:[
 	    nLines := 20
 	] ifFalse:[
 	    nLines := 30
 	]
     ] ifFalse:[
-        nLines := 40
+	nLines := 40
     ].
 
     accepted := false.
@@ -244,6 +244,6 @@
 !LicenceBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/LicenceBox.st,v 1.11 1999-03-09 22:29:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/LicenceBox.st,v 1.12 1999-03-09 22:34:03 cg Exp $'
 ! !
 LicenceBox initialize!