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. !