--- a/LicenceBox.st	Fri Mar 19 21:20:06 1999 +0100
+++ b/LicenceBox.st	Fri Mar 19 22:14:17 1999 +0100
@@ -129,7 +129,7 @@
 !LicenceBox methodsFor:'initialization'!
 
 initialize    
-    |textView smallScreen nLines|
+    |textView nLines|
 
     super initialize.
 
@@ -169,7 +169,7 @@
 licenceFile
     "get filename of licence file"
 
-    |fn sysFile|
+    |fn|
 
     fileName isNil ifTrue:[
 	fileName := fn := resources at:'LICENCEFILE' default:nil.
@@ -244,6 +244,6 @@
 !LicenceBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/LicenceBox.st,v 1.12 1999-03-09 22:34:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/LicenceBox.st,v 1.13 1999-03-19 21:14:17 cg Exp $'
 ! !
 LicenceBox initialize!