'From etoys2.1 of 26 July 2007 [latest update: #1576] on 3 September 2007 at 3:03:24 am'! "Change Set: variableSpacer-sw Date: 2 September 2007 Author: Scott Wallace Adds a generic variable transparent spacer that is halo-shy."! AlignmentMorph subclass: #VariableSpacer instanceVariableNames: '' classVariableNames: '' poolDictionaries: '' category: 'Morphic-Basic'! !VariableSpacer commentStamp: 'sw 9/3/2007 03:00' prior: 0! A transparent, space-filling, halo-shy morph, for use in alignment structures.! !AlignmentMorph class methodsFor: 'instance creation' stamp: 'sw 9/2/2007 15:06'! newVariableTransparentSpacer "Answer a new variable tranparent spacer." ^ VariableSpacer new! ! !VariableSpacer methodsFor: 'initialization' stamp: 'sw 9/2/2007 15:06'! initialize "Initialize the receiver to be a halo-shy variable transparent spacer." super initialize. self hResizing: #spaceFill; vResizing: #spaceFill; layoutInset: 0; borderWidth: 0; extent: 1@1; color: Color transparent! ! !VariableSpacer methodsFor: 'halos and balloon help' stamp: 'sw 9/2/2007 04:15'! wantsHaloFromClick "Answer no." ^ false! !