[ANN] 6696 out
stéphane ducasse
ducasse at iam.unibe.ch
Sat Nov 5 17:08:54 UTC 2005
right now I cannot load code anymore :)
so I will wait a bit for this one.... first I need feedback from the
tool guys on the fixes I proposed.
Stef
>
>> karl
>>
>> should I publish this code in MorphicExtras?
>>
>> Stef
>>
>>
>>> Try this changeset
>>> Karl
>>> 'From Squeak3.9alpha of 4 July 2005 [latest update: #6702] on 5
>>> November 2005 at 2:47:45 pm'!
>>>
>>> !PasteUpMorph methodsFor: '*MorphicExtras-world state' stamp:
>>> 'kfr 10/16/2005 00:44'!
>>> restoreFlapsDisplay
>>> "Restore the display of flaps"
>>>
>>> (Flaps sharedFlapsAllowed and: [Project current
>>> flapsSuppressed not]) ifTrue:
>>> [Flaps globalFlapTabs do:
>>> [:aFlapTab | aFlapTab adaptToWorld]].
>>> self localFlapTabs do:
>>> [:aFlapTab | aFlapTab adaptToWorld].
>>> self assureFlapTabsFitOnScreen.
>>> self bringTopmostsToFront! !
>>>
>>>
>>> !Project methodsFor: 'flaps support' stamp: 'kfr 11/5/2005 14:43'!
>>> suppressFlapsString
>>> ^ (self flapsSuppressed
>>> ifTrue: ['<no>']
>>> ifFalse: ['<yes>']), 'show shared tabs (F)' translated! !
>>>
>>> !Project methodsFor: 'flaps support' stamp: 'kfr 11/4/2005 23:08'!
>>> toggleFlapsSuppressed
>>> "
>>> Project toggleFlapsSuppressed
>>> "
>>>
>>> ^self flapsSuppressed: self flapsSuppressed not.! !
>>>
>>>
>>>
>>>
>>
>>
>>
>>
>>
> Sure, and you can then close issue #2124 on mantis :-)
>
> Karl
>
>
>
More information about the Squeak-dev
mailing list
|