31bb1d1b2d
The Tcl expression "[append [mc Foo] Bar]" does not return the string "FooBar" after translation; instead it is setting the variable Foo to the value Bar, or if Foo is already defined it is appending Bar onto the end of it. This is *not* what we wanted to have happen here. Tcl's join function is actually the correct function but its default joinStr argument is a single space. Unfortunately all of our call sites do not want an extra space added to their string. So we need a small wrapper function to make the call to join with an empty join string. In C this is (roughly) the job of the strcat function. Since strcat is not yet used at the global level it is a reasonable name to use here. Signed-off-by: Shawn O. Pearce <spearce@spearce.org> |
||
---|---|---|
.. | ||
blame.tcl | ||
branch_checkout.tcl | ||
branch_create.tcl | ||
branch_delete.tcl | ||
branch_rename.tcl | ||
branch.tcl | ||
browser.tcl | ||
checkout_op.tcl | ||
choose_font.tcl | ||
choose_rev.tcl | ||
class.tcl | ||
commit.tcl | ||
console.tcl | ||
database.tcl | ||
date.tcl | ||
diff.tcl | ||
encoding.tcl | ||
error.tcl | ||
index.tcl | ||
merge.tcl | ||
option.tcl | ||
remote_branch_delete.tcl | ||
remote.tcl | ||
shortcut.tcl | ||
status_bar.tcl | ||
transport.tcl |