--- a/Method.st Tue Sep 26 15:42:24 2000 +0200
+++ b/Method.st Tue Sep 26 15:46:52 2000 +0200
@@ -2400,7 +2400,7 @@
This collection only includes implicit symbols references (i.e. not
messages sent)"
- ^ self parse:#'parseMethodSilent:' return:#usedSymbols or:#()
+ ^ self parse:#'parseMethodSilent:in:' with:self mclass return:#usedSymbols or:#()
"
(Method compiledMethodAt:#usedSymbols) usedSymbols
@@ -2775,6 +2775,6 @@
!Method class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.207 2000-09-26 13:42:24 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.208 2000-09-26 13:46:52 cg Exp $'
! !
Method initialize!