Posted to tcl by mjanssen at Sun Nov 06 20:59:31 GMT 2016view pretty

% set template {.${id}_button_common_*.( $page match *Controls ) > {
  "width"        :     300
  "height"       :     150
  "x"            :     10
  "y"            :     30
}}

% set id 12 ; set page index ; subst $template
.12_button_common_*.( index match *Controls ) > {
  "width"        :     300
  "height"       :     150
  "x"            :     10
  "y"            :     30
}