data

$line data: returns data for XML processing

obj method line data {} {
  dict create type element\
    name line\
    attribute [dict create\
    id line-[lsearch [our instances] $self]\
    width [$self cget -width]\
    outline [$self cget -outline]\
    smooth [$self cget -smooth]\
    constraint [$self cget -constraint]]\
    content [lmap dot [my dots] {$dot data}]
}