Adding a new tool to the Tools flap

Scott Wallace scott at squeakland.org
Thu Sep 6 23:22:56 UTC 2001


Hi Jeff,

(1)  To do something like this on a once-off basis, you can simply 
drag an actual Whisker-Browser or Refactoring-Browser (or indeed 
*any* morph, whether or not it's a window) over the Tools tab and, 
after the Tools flap pops open, drop it anywhere on the flap.  This 
will add the item wherever you dropped it.

(To succeed at dropping a window into such a flap, however, you'll 
want to have #systemWindowEmbedOK preference temporarily set to true, 
and the #fastDragWindowForMorphic preference temporarily set to 
false.)


(2)  If you want to make a code change such that all subsequent 
reinitializations of default flaps (such as can be done from the 
Flaps menu) will include the extra ones you want, then simply edit 
method Flaps class.quadsDefiningToolsFlap, inserting the extra 
item-defining tuples you want, wherever you want them.

(Hopefully the pattern for expressing items in this method will be obvious.)

After you've done that, you can see the effect by bringing up the 
Flaps menu, and first requesting "destroy all shared flaps" (to get 
rid of the old ones,) then requesting "install default shared flaps".


Hope this helps.

   -- Scott



At 11:03 AM -0400 9/6/01, Jeff Sparkes wrote:
>I'd like to put whisker and the RB in there, but have followed the trail
>into a loop.   I got as far as PartsBin, and then got lost.  I can't
>find where the default flaps actually get some content.
>
>Can anybody explain it?





More information about the Squeak-dev mailing list