--- a/DebugView.st Thu Mar 01 14:19:43 2012 +0100
+++ b/DebugView.st Thu Mar 01 14:21:31 2012 +0100
@@ -3601,7 +3601,10 @@
(home := selectedContext methodHome) notNil ifTrue:[
(sel := home selector) notNil ifTrue:[
cls := home receiver class
- whichClassImplements:selectedContext selector
+ whichClassImplements:selectedContext selector.
+ cls notNil ifTrue:[
+ Dialog information:'Method has been changed/moved in the meanwhile.\Browser will show the most recent (current) version.' withCRs.
+ ].
]
].
].
@@ -3614,7 +3617,7 @@
cls browserClass openInClass:cls selector:sel.
"Created: / 22-11-1995 / 21:27:01 / cg"
- "Modified: / 01-03-2012 / 14:19:09 / cg"
+ "Modified: / 01-03-2012 / 14:21:11 / cg"
!
browseImplementors
@@ -7297,8 +7300,12 @@
!DebugView class methodsFor:'documentation'!
+version
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.529 2012-03-01 13:21:31 cg Exp $'
+!
+
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.528 2012-03-01 13:19:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.529 2012-03-01 13:21:31 cg Exp $'
!
version_SVN