diff --git a/src/NewTools-Inspector/StRawInspectionPresenter.class.st b/src/NewTools-Inspector/StRawInspectionPresenter.class.st index ed9f563ab..c6965a783 100644 --- a/src/NewTools-Inspector/StRawInspectionPresenter.class.st +++ b/src/NewTools-Inspector/StRawInspectionPresenter.class.st @@ -171,26 +171,15 @@ StRawInspectionPresenter >> step [ attributeTable updateRootsKeepingSelection: rootNodes ] -{ #category : 'building' } -StRawInspectionPresenter >> updatePresenterTitle [ - "Callback after changing a receiver's value (in a column for an instance variable). Update the window title and its header to display the new value" - | wp | - - wp := self window presenter. - wp firstPage updateHeaderBar. - self window title: wp windowTitle -] - { #category : 'building' } StRawInspectionPresenter >> valuesColumn [ ^ SpStringTableColumn new title: 'Value'; evaluated: #stringValue; - beEditable; + "beEditable;" onAcceptEdition: [ :node :value | - self write: node value: value. - self updatePresenterTitle ]; + self inform: node label , '=' , value asString "node value: value" ]; sortFunction: #stringValue ascending; yourself ] @@ -211,13 +200,3 @@ StRawInspectionPresenter >> variablesColumn [ sortFunction: #label ascending; yourself ] - -{ #category : 'writing' } -StRawInspectionPresenter >> write: aStInspectorSlotNode value: aString [ - "Update the value of aStInspectorSlotNode with new value aString. - Convert aString to the 'native' object parsing it as number or using parseLiterals (for booleans or strings)" - - aStInspectorSlotNode slot - write: (NumberParser parse: aString onError: [ aString parseLiterals first ]) - to: aStInspectorSlotNode hostObject -]