GraphicsAttributes.st
changeset 154 871a750ba914
parent 151 8123ec03c52f
child 157 891eff44c2e7
--- a/GraphicsAttributes.st	Tue Jun 27 04:21:46 1995 +0200
+++ b/GraphicsAttributes.st	Sun Jul 02 18:18:17 1995 +0200
@@ -25,7 +25,7 @@
 COPYRIGHT (c) 1992 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libview/GraphicsAttributes.st,v 1.1 1995-06-06 04:07:14 claus Exp $
+$Header: /cvs/stx/stx/libview/GraphicsAttributes.st,v 1.2 1995-07-02 16:16:15 claus Exp $
 '!
 
 !GraphicsAttributes class methodsFor:'documentation'!
@@ -46,7 +46,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libview/GraphicsAttributes.st,v 1.1 1995-06-06 04:07:14 claus Exp $
+$Header: /cvs/stx/stx/libview/GraphicsAttributes.st,v 1.2 1995-07-02 16:16:15 claus Exp $
 "
 !
 
@@ -77,7 +77,7 @@
 installOn:aGC
     paint notNil ifTrue:[aGC paint:paint].
     font notNil ifTrue:[aGC font:font].
-    lineWIdth notNil ifTrue:[aGC lineWidth:lineWidth].
+    lineWidth notNil ifTrue:[aGC lineWidth:lineWidth].
     lineStyle notNil ifTrue:[aGC lineStyle:lineStyle].
     joinStyle notNil ifTrue:[aGC joinStyle:joinStyle].
     capStyle notNil ifTrue:[aGC capStyle:capStyle].