--- a/TextView.st	Mon Mar 23 10:59:52 2009 +0100
+++ b/TextView.st	Mon Mar 23 11:00:17 2009 +0100
@@ -3360,7 +3360,7 @@
         ^ failBlock value   "not a parenthesis"
     ].
 
-    direction := (i <= openingCharacters size) ifTrue:#fwd ifFalse:#bwd.
+    direction := (i <= openingCharacters size) ifTrue:[#fwd] ifFalse:[#bwd].
     closingChar := (closingCharacters , openingCharacters) at:i.
 
     eol1 := eolCommentSequence at:1 ifAbsent:nil.
@@ -4277,7 +4277,7 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.298 2009-03-06 13:52:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.299 2009-03-23 10:00:17 cg Exp $'
 ! !
 
 TextView initialize!