http://qs321.pair.com?node_id=1050170


in reply to Re^4: perl tk frame packing question
in thread perl tk frame packing question

It's not enough because you don't call RefontTree again after destroing the HList. ItemStyle has a font option, make $font global and use it to set the font when the HList is recreated (-font => $font).