[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