[ANN] 6696 out
karl
karl.ramberg at chello.se
Sat Nov 5 16:50:03 UTC 2005
stéphane ducasse wrote:
> 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
|