* scripts/tablelistUtil.tcl: Small correction.