# Packer chapter
foreach anchor {center n ne e se s sw w nw center} {                        
	pack .foo .prop -anchor $anchor       
	update idletasks                                 
	after 500                 
}
