--- a/Tools_MethodList.st Sun Jun 07 12:17:23 2009 +0200
+++ b/Tools_MethodList.st Sun Jun 07 12:17:44 2009 +0200
@@ -1248,8 +1248,9 @@
oldListSize := self browserNameList size.
- "/ self topApplication withWaitCursorDo:[
- newList := self listOfMethodNames.
+ self topApplication withWaitCursorDo:[
+ newList := self listOfMethodNames.
+ ].
newListSize := newList size.
sameContents := self updateListFor:newList.
@@ -1579,5 +1580,5 @@
!MethodList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.36 2009-05-28 19:19:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.37 2009-06-07 10:17:44 cg Exp $'
! !