# HG changeset patch # User Claus Gittinger # Date 1401357018 -7200 # Node ID 5bdc0a26498c5d046fb32ccee5c421034d4a7240 # Parent 8b3c2b6d3fb232509409632efb2ef56364fc1f68 class: Tools::ViewTreeInspectorApplication changed: #path diff -r 8b3c2b6d3fb2 -r 5bdc0a26498c Tools__ViewTreeApplication.st --- a/Tools__ViewTreeApplication.st Fri May 23 11:37:27 2014 +0200 +++ b/Tools__ViewTreeApplication.st Thu May 29 11:50:18 2014 +0200 @@ -981,7 +981,10 @@ path isNil ifTrue:[ - path := PluggableAdaptor on: self model getter:[ :model | model path ] + path := PluggableAdaptor + on: self model + getter:[ :model | model path ] + setter:[ :model :newValue | ] ]. ^ path. @@ -3149,8 +3152,8 @@ views removeLast. ^ String streamContents:[ :s| views reverseDo:[:each | - s nextPutAll:' / '. - s nextPutAll: each name asString storeString. + s nextPutAll:'/'. + s nextPutAll: each name asString "storeString". ]. ]