dumper::relativename
relativename target \ id appendix
Get a proper window name --relative.
Example 3.9. ::vgcode::baseName using relativename
... set rest {}; if \ [regexp "(\\ [\.\]+\\ [\.a-zA-Z0-9_\]*)(.*)" $target match name rest] { return \ [dumper::relativename $target \ [registerWidget \ [string range $name $id_base end]] $rest]
Copyright © 2009–2010 Arndt Roger Schneider