--- a/Tools__NewSystemBrowser.st Thu Jun 22 11:30:59 2017 +0200
+++ b/Tools__NewSystemBrowser.st Thu Jun 22 11:31:29 2017 +0200
@@ -59874,13 +59874,21 @@
"/ ok, it is redefined
methodThere := implClass compiledMethodAt:sel.
+ "/ these are allowed to be empty and only contain different comments...
+ (aClass isMeta
+ and:[methodHere category = 'documentation'
+ and:[methodThere category = 'documentation'
+ ]]) ifTrue:[
+ ^ nil
+ ].
+
(RBCodeDuplicationRule isMethod:methodHere duplicateOfInherited:methodThere) ifTrue:[
^ 'This method''s functionality is already inherited from ', implClass name , '.\\You may want to remove it here.'.
].
^ nil
- "Modified (comment): / 06-02-2017 / 15:14:21 / cg"
+ "Modified: / 22-06-2017 / 08:15:27 / cg"
!
checkIfSuperSendIsProbablyMissingIn:methodHere inClass:aClass