Mercurial > hg > egg-tcls
diff hae_ruoka.tcl @ 63:7b03971c6d28
Remove tabs and reindent.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Thu, 08 Sep 2011 22:26:52 +0300 |
parents | 026257a62da4 |
children | df3230f8aa46 |
line wrap: on
line diff
--- a/hae_ruoka.tcl Thu Sep 08 22:23:33 2011 +0300 +++ b/hae_ruoka.tcl Thu Sep 08 22:26:52 2011 +0300 @@ -67,8 +67,8 @@ foreach {ukey udata} $umat { set item [string trim [convert_ent $udata]] if {[string length $item] > 0} { - lappend tmp $item - } + lappend tmp $item + } } add_entry $dataname [lindex $umatches 1] [lindex $umatches 2] [join $tmp "; "] } @@ -100,8 +100,8 @@ foreach {ukey udata} $umat { set item [string trim [convert_ent $udata]] if {[string length $item] > 0} { - lappend tmp $item - } + lappend tmp $item + } } add_entry $dataname [lindex $umatches 1] [lindex $umatches 2] [join $tmp "; "] }