may be
showLesson: aLesson withTitle: aString
self window setLabel: aString.
self sourceTextModel setText: aLesson lesson.
self isOpenInWindow ifFalse: [ self open ]
but I do not know :(
Stef
Maybe both,
beForSmalltalkCode and beForSmalltalkScripting in
RubScrolledTextMorph should use
self textArea font: StandardFonts codeFont
At the moment, only beForSmalltalkCode sets this font.
Yes I did the same as you, I tried to add
beForSmalltalkScripting
self textArea beForSmalltalkScripting.
self textArea font: StandardFonts codeFont
But without success. I'm puzzled.
Stef
