Evaluated eval [wget https://dpaste.com/BFHL43A2T.txt]
This commit is contained in:
parent
63d2df2ea0
commit
e4db2f690f
@ -10,7 +10,7 @@
|
|||||||
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] [lindex $f 0]];
|
append r [lindex [lindex $c 0] [lindex $f 0]];
|
||||||
lappend debug "actually appended the character to be formatted: $r";
|
lappend debug "actually appended the character [lindex $f 0] of [lindex $c 0] 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";}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user