[squeak-dev] The Trunk: Morphic-laza.389.mcz
Chris Muller
asqueaker at gmail.com
Thu Mar 25 23:05:07 UTC 2010
Why should the window buttons be dimmed just because the window is not
the one with keyboard focus? Normally, buttons are dimmed when the
buttons _themselves_ are not active, which is not always the case with
window buttons sticking out of background windows..
On Thu, Mar 25, 2010 at 9:56 AM, <commits at source.squeak.org> wrote:
> Alexander Lazarević uploaded a new version of Morphic to project The Trunk:
> http://source.squeak.org/trunk/Morphic-laza.389.mcz
>
> ==================== Summary ====================
>
> Name: Morphic-laza.389
> Author: laza
> Time: 25 March 2010, 3:55:38.504 pm
> UUID: 2559029d-daab-4085-b080-eb9f63f493de
> Ancestors: Morphic-ar.388
>
> make inactive Window buttons dimmed
>
> =============== Diff against Morphic-ar.388 ===============
>
> Item was added:
> + ----- Method: SystemWindowButton>>unlock (in category 'accessing') -----
> + unlock
> + self restoreImage.
> + super unlock!
>
> Item was added:
> + ----- Method: SystemWindowButton>>lock (in category 'accessing') -----
> + lock
> + self passivate.
> + super lock!
>
> Item was changed:
> ----- Method: SystemWindow>>passivate (in category 'top window') -----
> passivate
> "Make me unable to respond to mouse and keyboard"
>
> label ifNotNil: [label color: Color darkGray].
> self setStripeColorsFrom: self paneColorToUse.
> model modelSleep.
>
> - "Control boxes remain active, except in novice mode"
> self submorphsDo: [:m |
> m == labelArea ifFalse:
> [m lock]].
> +
> + "Control boxes remain active, except in novice mode"
> + labelArea
> + ifNotNil: [
> + labelArea submorphsDo: [:m |
> + (Preferences noviceMode not and: [m == closeBox or: [m == collapseBox]]) ifFalse: [m lock]]]
> - labelArea ifNotNil:
> - [labelArea submorphsDo: [:m |
> - m == label
> - ifTrue: [m lock]
> - ifFalse: [
> - Preferences noviceMode
> - ifTrue: [m lock; hide]
> - ifFalse: [
> - (m == closeBox or: [m == collapseBox])
> - ifFalse: [m lock; hide]]]]]
> ifNil: "i.e. label area is nil, so we're titleless"
> [self adjustBorderUponDeactivationWhenLabeless].
> !
>
> Item was added:
> + ----- Method: SystemWindowButton>>passivate (in category 'visual properties') -----
> + passivate
> +
> + self firstSubmorph form: (self firstSubmorph form dimmed)
> + !
>
>
>
More information about the Squeak-dev
mailing list
|