Example 3.33. ::vgcode::dump-geometry-canvas using canvasNew
...
set id \
[$canvas find withtag $target];
set c_name \
[vgcode::baseName $canvas $basename $id_base];
return \
[dumper::canvasNew $c_name window \
[$canvas coords $id] \
[dumper::properties \
[vgcode::clearOptions \
[$canvas itemconfigure $id] $basename]] $target]