--- a/HierarchicalListView.st	Fri Feb 20 12:30:59 2004 +0100
+++ b/HierarchicalListView.st	Fri Feb 20 12:36:40 2004 +0100
@@ -1405,12 +1405,8 @@
 widthOfWidestLineBetween:firstLine and:lastLine
     "returns the width of the longest line in pixels in a range
     "
-    |parent item
-     textX        "{ Class: SmallInteger }"
-     level        "{ Class: SmallInteger }"
-     width        "{ Class: SmallInteger }"
-     widthOfLabel "{ Class: SmallInteger }"
-    |
+    |parent item textX level width widthOfLabel|
+
     width := renderer widthOfWidestLineBetween:firstLine and:lastLine.
     width notNil ifTrue:[^ width].
 
@@ -1605,5 +1601,5 @@
 !HierarchicalListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.89 2004-02-20 11:30:59 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.90 2004-02-20 11:36:40 ca Exp $'
 ! !