include('TKWidget')

func doPack(_data)
  fvar(old, wgt)
  wgt = 'self.button'&&code(_id_)&&' = Button(self.master, text='&&Caption
  
  if (linked(onCommand))
    wgt = wgt && ', command=self.onCommand'&&code(_id_)
	old = block.select(BLK_FUNC)
	println('def onCommand'&&code(_id_)&&'(self):')
	block.inclvl()
	event(onCommand)
	block.declvl()
	block.select(old)
  end
  
  InitTKWidget(wgt)
  PackTKWidget('self.button'&&code(_id_))
  BindTKWidget('self.button'&&code(_id_))

  event(onPack)
end