[Bug]: <Chinese characters may cause unexpected line breaks>

[Yuzhou-Long]

What happened?

We put our ADTTE data with Chinese characters variable PARAM into the app, and then found the app, more precisely the forest plot part "tm_g_forest_tte", was unable to work properly. We checked the output R codes, found a single command was split into two lines, which led to the problem. please check the uploaded pics.

The extra line breaks make us suspect that it was the Chinese characters that caused the problem. To verify the assumption, we tried two methods: a. assigning English values to PARAM variable/ b. simply removing the parameter of label, that is, leaving a blank after PARAMCD. Both of them worked.

sessionInfo()

Relevant log output

Code of Conduct

• I agree to follow this project's Code of Conduct.

Contribution Guidelines

• I agree to follow this project's Contribution Guidelines.

Security Policy

• I agree to follow this project's Security Policy.

[llrs-roche]

@Yuzhou-Long Many thanks for the report. Could you provide the Chinese characters that break the app (in plain text so that we can copy them)? It will help us to verify the bug report and the fix. This could be a problem how the characters are handled or a problem on teal.

[Yuzhou-Long]

“总生存期 (月)” and "无进展生存期 (月)", please test these two, thank you!

@Yuzhou-Long Many thanks for the report. Could you provide the Chinese characters that break the app (in plain text so that we can copy them)? It will help us to verify the bug report and the fix. This could be a problem how the characters are handled or a problem on teal.

[Yuzhou-Long]

tm_t_coxreg() got same issue

[llrs-roche]

There seems to be a problem with the second string and how it is handled on the teal.data environment even when I use raw strings (See ?Quotes):

library("teal.data")
#> Loading required package: teal.code
td <- within(teal_data(), {
r"--(总生存期 (月))--"
r"--(无进展生存期 (月))--"
})

td |> get_code() |> cat()
#> "总生存期 (月)"
#> "无进展生存期 (
#> 月)"
r"--(总生存期 (月))--"
#> [1] "总生存期 (月)"
r"--(无进展生存期 (月))--"
#> [1] "无进展生存期 (月)"

^{Created on 2026-03-13 with reprex v2.1.1}

Not sure if this is the root cause or something related, as the problematic string was the first one in your code and here is the second one only.
My recommendation for now is to use raw strings

[xiongyibin]

If I change the order of the strings, it seems to work normally.

library("teal.data")
#> Loading required package: teal.code
td1 <- within(teal_data(), {
  r"--(无进展生存期 (月))--"
  r"--(总生存期 (月))--"
})

get_code(td1) |> cat()
#> "无进展生存期 (月)"
#> "总生存期 (月)"

However, when I add new strings, it causes abnormal line breaks. Is the cause of the issue related to the length of Chinese characters?

library("teal.data")
#> Loading required package: teal.code
td2 <- within(teal_data(), {
  r"--(无进展生存期 (月))--"
  r"--(总生存期 (月))--"
  r"--(缓解持续时间 (月))--"
  r"--(确认的缓解持续时间 (月))--"
})

get_code(td2) |> cat()
#> "无进展生存期 (月)"
#> "总生存期 (月)"
#> "缓
#> 解持续时间 (
#> 月)"
#> "确认的缓解持续时间 (月
#> )"

When testing with English, the length of the strings does not cause any abnormalities.

[llrs-roche]

Thanks @xiongyibin for the new test. I thought so initially but I am not sure, your tests show that the length is not as important as the position. On your example if the longest line is the first one, then the last parenthesis is not broken to a new line.

Transferring this to the relevant package where this should be handled.

[llrs-roche]

Hi @xiongyibin, and @Yuzhou-Long.

We updated teal.code to cover this problem on #285.
Please install the version from github (remotes::install_github("insightsengineering/teal.code"), or pak::pak("insightsengineering/teal.code")) and try again you app. I think it should have fixed the issue you see on all modules and apps but there might be something else I missed.