--- a/CodeView.st	Mon May 18 16:30:07 2009 +0200
+++ b/CodeView.st	Mon May 18 16:30:25 2009 +0200
@@ -150,7 +150,9 @@
             col := self colOfX:x inVisibleLine:line.
             line := self visibleLineToAbsoluteLine:line.
 
-            self wordAtLine:line col:col do:[:selectLine :beginCol :endLine :endCol :flag |
+            self wordAtLine:line col:col do:[
+                :selectLine :beginCol :endLine :endCol :flag |
+
                 word := self listAt:selectLine from:beginCol to:endCol.
                 word notNil ifTrue:[
                     pointerOverWordAction value:word value:line value:col
@@ -319,5 +321,5 @@
 !CodeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.60 2008-12-09 18:48:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.61 2009-05-18 14:30:25 cg Exp $'
 ! !