This commit is contained in:
radical_honesty on #flashsupport 2023-01-13 15:59:03 -08:00 committed by dupa dup
parent 04d6625683
commit 250a01b24c

View File

@ -6,9 +6,11 @@
set u 0 set u 0
set cf -1 set cf -1
set cb -1 set cb -1
set r [lindex $c 0] set r ""
foreach f [lindex $c 1] { foreach f [lindex $c 1] {
lappend debug "working on $f"; lappend debug "working on $f";
append r [lindex [lindex $c 0] $f];
lappend debug "actually appended the character to be formatted: $r";
if {[lindex $f 0] > $n} { if {[lindex $f 0] > $n} {
lappend debug "reached end of string" lappend debug "reached end of string"
if {$b eq 1} {append r "\002"; lappend debug "ending bold";} if {$b eq 1} {append r "\002"; lappend debug "ending bold";}