Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.815.mcz
==================== Summary ====================
Name: Tools-mt.815 Author: mt Time: 24 May 2018, 10:49:38.933621 am UUID: d4418382-5b3a-b74d-ac4c-a16f2306827d Ancestors: Tools-tpr.814
Avoid unnecessary tabs or linebreaks when creating accessors.
=============== Diff against Tools-tpr.814 ===============
Item was changed: ----- Method: Behavior>>createGetterFor: (in category '*Tools-Browser-accessors') ----- createGetterFor: aName
| code | + code := '{1}\ ^ {1}' withCRs format: {aName}. - code := '{1}\ \ ^ {1}' withCRs format: {aName.}. self compile: code classified: #accessing notifying: nil.!
Item was changed: ----- Method: Behavior>>createSetterFor: (in category '*Tools-Browser-accessors') ----- createSetterFor: aName
| code | + code := '{1}: anObject\ {2}{1} := anObject.' withCRs + format: {aName. self settersReturnValue ifTrue: ['^ '] ifFalse: ['']}. - code := '{1}: anObject\ \ {2}{1} := anObject.' withCRs - format: {aName. self settersReturnValue ifTrue: ['^ '] ifFalse: [''].}. self compile: code classified: #accessing notifying: nil.!
Item was changed: ----- Method: Behavior>>settersReturnValue (in category '*Tools-Browser-accessors') ----- settersReturnValue "Determine whether the browser's createInstVarAccessors code will generate setters that answer self (the default here) or the value set. Classes that want to answer the value set (e.g. VMStructType) override." + + ^ false! - ^false!
packages@lists.squeakfoundation.org