Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: Tools::MethodList
authorClaus Gittinger <cg@exept.de>
Wed, 19 Nov 2014 18:54:00 +0100
changeset 14847 a69476d48e3d
parent 14846 5fab48017422
child 14848 8a15194d34e6
class: Tools::MethodList changed: #update:with:from:
Tools__MethodList.st file | annotate | diff | comparison | revisions 
--- a/Tools__MethodList.st	Wed Nov 19 18:50:02 2014 +0100
+++ b/Tools__MethodList.st	Wed Nov 19 18:54:00 2014 +0100
@@ -843,6 +843,8 @@
                 ^ self
             ].
             cls := aParameter at:1.
+            (classes includesIdentical:cls) ifFalse:[ ^ self].
+
             sel := aParameter at:2.
             mthd := cls compiledMethodAt:sel.
             (mthd notNil and:[mthd isWrapped or:[mthd isMethodWithBreakpoints]]) ifTrue:[
@@ -1895,10 +1897,10 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.106 2014-07-29 15:15:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.107 2014-11-19 17:54:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.106 2014-07-29 15:15:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.107 2014-11-19 17:54:00 cg Exp $'
 ! !
hg/stx-libtool