::xotcl::Object create ::defaultMaster
::defaultMaster proc decorate node { $node appendFromScript { set slave [tmpl::div] } return $slave }
Mis preferencias