Skip to content

Commit

Permalink
fixes #182 method pane colors
Browse files Browse the repository at this point in the history
  • Loading branch information
Eric Winger authored and Eric Winger committed Sep 17, 2018
1 parent 70f9b0d commit 452800a
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 10 deletions.
12 changes: 3 additions & 9 deletions sources/JadeSystemBrowserPresenter.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -2114,25 +2114,19 @@ selectedMethodName
!
setColorForCompileErrors
| newColor |
newColor := ColorDialog showModalOn: JadeTextStyles default colorForNoEdits.
JadeTextStyles default colorForCompileError: newColor.
!
newColor ifNotNil: [JadeTextStyles default colorForCompileError: newColor]!
setColorForNoEdits
| newColor |
newColor := ColorDialog showModalOn: JadeTextStyles default colorForNoEdits.
JadeTextStyles default colorForNoEdits: newColor.
!
newColor ifNotNil: [JadeTextStyles default colorForNoEdits: newColor]!
setColorForUnsavedEdits
| newColor |
newColor := ColorDialog showModalOn: JadeTextStyles default colorForUnsavedEdits.
JadeTextStyles default colorForUnsavedEdits: newColor.
!
newColor ifNotNil: [JadeTextStyles default colorForUnsavedEdits: newColor]!
setEnvironment: anInteger
Expand Down
4 changes: 3 additions & 1 deletion sources/RowanTranscript.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -33,7 +33,9 @@ onViewOpened
super onViewOpened.
projectListPresenter
gciSession: gciSession;
browseProjects.!
browseProjects.
"reset colors on login"
JadeTextStyles default resetColors.!

openDictionaryBrowser
gciSession hasServer ifTrue: [^RowanSystemBrowser showOnSession: gciSession]!
Expand Down

0 comments on commit 452800a

Please sign in to comment.