html not properly escaped with opt_all_caps() + cells_column_labels()

[olivroy]

Description

Speaking about a universal linebreak #1767

gt/R/info_tables.R

Line 802 in 819e43a

value = html("Formatted<br>Value")

The info_locales() table shows
in the heading.

It may be an issue with opt_all_caps() + md() or something?

info_locales()

Describe the bug clearly and concisely.

Expected results

Line break respected.

I put my tentative diagnostic in the issue name, but feel free to change if my assessment was wrong

Note:

As standalone, I don't have issues.

exibble |> 
  gt() |> 
  cols_label(
    num = md("num<br>x")
  ) |> 
  opt_all_caps(
    locations = "column_labels"
  )