--- a/TextView.st	Tue Feb 26 13:57:57 2002 +0100
+++ b/TextView.st	Tue Feb 26 13:59:59 2002 +0100
@@ -2824,7 +2824,7 @@
         self cursor:(Cursor cross).
         self beep.
         Processor activeProcess millisecondDelay:300.
-    ] valueNowOrOnUnwindDo:[
+    ] ensure:[
         self cursor:savedCursor
     ]
 
@@ -3244,5 +3244,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.176 2001-11-27 18:01:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.177 2002-02-26 12:59:52 cg Exp $'
 ! !