When the user wants to edit a script and when clicking on a script there is this error.
The method methodsIn: contains a lot of broken code now: #wrapper and #defaultPane are now unknown messages :(
methodsIn: composite composite wrapper title: 'Methods' translated; show: [ :wrapper | wrapper fastList display: [ :aClass | aClass methods collect: [ :m | m asRingDefinition ]]; format: [ :aCompiledMethod | aCompiledMethod selector asString ] ]. composite wrapper title: 'Script data' translated; show: [ :wrapper | wrapper fastList display: [ :aClass | aClass class methods collect: [ :m | m asRingDefinition ]]; format: [ :aCompiledMethod | aCompiledMethod selector asString ] ]. composite updateOn: MethodModified from: [ SystemAnnouncer uniqueInstance ]; updateOn: MethodAdded from: [ SystemAnnouncer uniqueInstance ]. composite onChangeOfPort: #activePresentation act: [ :presentation | (presentation pane port: #activePresentation) value ifNotNil: [ :activePresentation | ((browser paneNamed: #methods) port: #selection) value: (activePresentation defaultPane port: #selection) value ] ].
When the user wants to edit a script and when clicking on a script there is this error.
The method methodsIn: contains a lot of broken code now: #wrapper and #defaultPane are now unknown messages :(
methodsIn: composite tion) value ifNotNil: [ :activePresentation |
composite wrapper title: 'Methods' translated;
show: [ :wrapper |
wrapper fastList
display: [ :aClass | aClass methods collect: [ :m | m asRingDefinition ]];
format: [ :aCompiledMethod | aCompiledMethod selector asString ] ].
composite wrapper title: 'Script data' translated;
show: [ :wrapper |
wrapper fastList
display: [ :aClass | aClass class methods collect: [ :m | m asRingDefinition ]];
format: [ :aCompiledMethod | aCompiledMethod selector asString ] ].
composite
updateOn: MethodModified from: [ SystemAnnouncer uniqueInstance ];
updateOn: MethodAdded from: [ SystemAnnouncer uniqueInstance ].
composite onChangeOfPort: #activePresentation act: [ :presentation |
(presentation pane port: #activePresenta
((browser paneNamed: #methods) port: #selection) value: (activePresentation defaultPane port: #selection) value ] ].