fix inutile template procedure call
This commit is contained in:
parent
115f0fdf0c
commit
2fa0155ca6
|
|
@ -168,7 +168,7 @@ proc inutile { {filename {}}} {
|
||||||
inutile_read_data .inutile.text \"$filename\""
|
inutile_read_data .inutile.text \"$filename\""
|
||||||
button .inutile.buttons.send -text "Template" -command "
|
button .inutile.buttons.send -text "Template" -command "
|
||||||
if { !\[string compare \[.inutile.text get 0.0 {end - 1 chars}\] {}\]} {
|
if { !\[string compare \[.inutile.text get 0.0 {end - 1 chars}\] {}\]} {
|
||||||
template .inutile.text $utile_path/template.stimuli}"
|
inutile_template .inutile.text $utile_path/template.stimuli}"
|
||||||
label .inutile.buttons.timelab -text "time:"
|
label .inutile.buttons.timelab -text "time:"
|
||||||
entry .inutile.buttons.time -width 11
|
entry .inutile.buttons.time -width 11
|
||||||
pack .inutile.buttons.dismiss .inutile.buttons.code \
|
pack .inutile.buttons.dismiss .inutile.buttons.code \
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue