tcl: replace the deprecated commands with "adapter ..."