Posted to tcl by jeremy_c at Thu Sep 13 23:14:32 GMT 2007view raw

  1. dbcombo instproc init args {
  2. upvar #0 $idvariable idvar
  3. trace add variable idvar write [list [my] showChange]
  4. }