Mercurial > hg > egg-tcls
changeset 108:d9de3870b72e
tj: Use append for better string manipulation.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Wed, 14 Sep 2011 19:34:23 +0300 |
parents | 92b42a867af4 |
children | 74cb254dbf09 |
files | tj.tcl |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/tj.tcl Wed Sep 14 19:21:48 2011 +0300 +++ b/tj.tcl Wed Sep 14 19:34:23 2011 +0300 @@ -171,8 +171,8 @@ } if {$tunnit > 0} { - if {$aamut > 0} { set lause "$lause ja" } - set lause "$lause $tunnit tuntia" + if {$aamut > 0} { append lause " ja " } + append lause "$tunnit tuntia" } if {$aamut == 0 && $deltatj > 0} {