>>
>>
>> The inspector is shouted because the "not to shout" was the default behavior
>> of Shout, but now,
>> okToStyle
>> self shoutEnabled
>> ifFalse: [^ false].
>> (model respondsTo: #shoutAboutToStyle:)
>> ifFalse: [^true].
>> ^model shoutAboutToStyle: self
>> the bold part make the default behavior "to shout".
>> So maybe this value should be changed. But let's wait for Alain explanation
>
> No, #shoutEnabled returning true makes it enabled.
I do not get it
okToStyle
self shoutEnabled
ifFalse: [^ false].
(model respondsTo: #shoutAboutToStyle:)
ifFalse: [^true].
^model shoutAboutToStyle: self
shoutEnabled
^ self class shoutEnabled
shoutEnabled
^ (Smalltalk globals includesKey: #SHPreferences)
and: [(Smalltalk globals at: #SHPreferences) enabled]
so when shout is loaded self shoutEnabled = true
self shoutEnabled
ifFalse: [^ false].
So okToStyle will return true when the method shoutAboutToStyle: is not defined
(model respondsTo: #shoutAboutToStyle:)
ifFalse: [^true].
and this is this default that I'm talking about.
Because if we would return false then only places that specifically define
shoutAboutToStyle would be styled.
No?
Stef
