Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.950.mcz==================== Summary ====================
Name: Kernel-eem.950
Author: eem
Time: 28 August 2015, 12:10:24.052 pm
UUID: 2b3d6360-4395-4cdf-8186-86c145c93ee2
Ancestors: Kernel-eem.949
Fix deprecated:[block:]
=============== Diff against Kernel-eem.949 ===============
Item was added:
+ ----- Method: Deprecation class>>maybeSignalDeprecationFor:message:explanation: (in category 'utilities') -----
+ maybeSignalDeprecationFor: context message: messageString explanation: explanationString
+ ShowDeprecationWarnings == true ifTrue:
+ [self signal: context method reference, ' has been deprecated', messageString, '. ', explanationString]!
Item was changed:
----- Method: Object>>backwardCompatibilityOnly: (in category 'error handling') -----
+ backwardCompatibilityOnly: explanationString
- backwardCompatibilityOnly: anExplanationString
"Warn that the sending method has been deprecated. Methods that are tagt with #backwardCompatibility:
are kept for compatibility."
+ Deprecation
+ maybeSignalDeprecationFor: thisContext sender
+ message: ' (but will be kept for compatibility)'
+ explanation: explanationString!
- Preferences showDeprecationWarnings ifTrue:
- [Deprecation signal: thisContext sender printString, ' has been deprecated (but will be kept for compatibility). ', anExplanationString]!
Item was changed:
----- Method: Object>>deprecated: (in category 'error handling') -----
+ deprecated: explanationString
- deprecated: anExplanationString
"Warn that the sending method has been deprecated."
+ Deprecation
+ maybeSignalDeprecationFor: thisContext sender
+ message: ''
+ explanation: explanationString!
- Preferences showDeprecationWarnings ifTrue:
- [Deprecation signal: thisContext sender printString, ' has been deprecated. ', anExplanationString]!
Item was changed:
----- Method: Object>>deprecated:block: (in category 'error handling') -----
+ deprecated: explanationString block: aBlock
- deprecated: anExplanationString block: aBlock
"Warn that the sender has been deprecated. Answer the value of aBlock on resumption. (Note that #deprecated: is usually the preferred method.)"
+ Deprecation
+ maybeSignalDeprecationFor: thisContext sender
+ message: ''
+ explanation: explanationString.
- Preferences showDeprecationWarnings ifTrue:
- [Deprecation
- signal: thisContext sender printString, ' has been deprecated. ', anExplanationString].
^ aBlock value.
!