# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1316018063 -10800
# Node ID d9de3870b72e77dd0de8b934166895cb2b540edc
# Parent  92b42a867af4a076af23c0a3c521581f9ba4194d
tj: Use append for better string manipulation.

diff -r 92b42a867af4 -r d9de3870b72e tj.tcl
--- 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} {