The Trunk: 45Deprecated-fbs.8.mcz

Nicolas Cellier uploaded a new version of 45Deprecated to project The Trunk:
http://source.squeak.org/trunk/45Deprecated-fbs.8.mcz

==================== Summary ====================

Name: 45Deprecated-fbs.8
Author: fbs
Time: 15 July 2013, 11:05:25.904 pm
UUID: 0cf4998f-1a21-e142-9b06-672f04121d79
Ancestors: 45Deprecated-fbs.7

#methodDiffFor:class:selector:prettyDiffs: has only one sender, so move the method where if wants to go and deprecate the old copy.

=============== Diff against 45Deprecated-fbs.7 ===============

Item was added:
+ ----- Method: Utilities class>>methodDiffFor:class:selector:prettyDiffs: (in category '*45Deprecated-miscellaneous') -----
+ methodDiffFor: aString class: aClass selector: aSelector prettyDiffs: prettyDiffBoolean
+       "Return a string comprising a source-code diff between an existing method and the source-code in aString.  DO prettyDiff if prettyDiffBoolean is true."
+
+       ^ (aClass notNil and: [aClass includesSelector: aSelector])
+               ifTrue:
+                       [TextDiffBuilder
+                               buildDisplayPatchFrom: (aClass sourceCodeAt: aSelector)
+                               to: aString
+                               inClass: aClass
+                               prettyDiffs: prettyDiffBoolean]
+               ifFalse:
+                       [aString copy]!