--- a/DisplayObject.st Tue Feb 26 14:03:27 2002 +0100
+++ b/DisplayObject.st Tue Feb 26 14:05:04 2002 +0100
@@ -257,7 +257,7 @@
aGC lineStyle:#dashed.
[
self drawOutlineIn:aGC offset:anOffset.
- ] valueNowOrOnUnwindDo:[
+ ] ensure:[
aGC lineStyle:prevStyle.
]
@@ -515,5 +515,5 @@
!DisplayObject class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/DisplayObject.st,v 1.24 2001-08-22 22:07:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/DisplayObject.st,v 1.25 2002-02-26 13:05:04 cg Exp $'
! !