configuremethod

obj configuremethod $clas $key $argl $body: manages $body to executed after configuration:

Example:

% obj configuremethod morph -coords args {
    [my line] configure -coords {*}$args
  }
configuremethod morph -coords
%