Skip to content

Commit

Permalink
Fixes #85 Hierarchy class def tab not updating
Browse files Browse the repository at this point in the history
  • Loading branch information
Eric Winger authored and Eric Winger committed Aug 20, 2018
1 parent b9241b5 commit 20a0e81
Showing 1 changed file with 7 additions and 3 deletions.
10 changes: 7 additions & 3 deletions sources/JadeiteProjectsBrowserPresenter.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -616,12 +616,14 @@ populateFilterList

postOkToChangeEvent
| service |
service := classListPresenter selectionOrNil ifNil: [^self].
service := self isClassListTabSelected
ifTrue: [classListPresenter selectionIfNone: [^self]]
ifFalse: [classHierarchyPresenter selectionIfNone: [^self]].
classDefinitionPresenter value: service template.
classDefinitionPresenter view
backcolor: Color white;
isModified: false.
self sundryCleanup.!
self sundryCleanup!

projectChanges
projectListPresenter selection changesUsing: self!
Expand Down Expand Up @@ -1144,7 +1146,9 @@ updateClasses

updateClassInfo
| service |
service := classListPresenter selectionIfNone: [^self].
service := self isClassListTabSelected
ifTrue: [classListPresenter selectionIfNone: [^self]]
ifFalse: [classHierarchyPresenter selectionIfNone: [^self]].
classCommentPresenter value: service comment.
classDefinitionPresenter view isModified
ifTrue:
Expand Down

0 comments on commit 20a0e81

Please sign in to comment.