gt::tab_footnote() gets rendered differently as HTML with or without label in a code block

[chainsawriot]

Description

I am not so sure whether this is a Quarto or gt issue, so I think it's better to ask first.

I have the following code block

```{r}
library(gt)
extracted_table <- structure(list(X = c("ALLBUS", "GIP", "NEPS", "Pairfam", "PASS", 
"PIAAC", "SOEP"), year = c("2010", "2012", "2011/12", "2008/09", 
"2011", "2011/12", "2011"), responserate = c("33.1", "42.9", 
"33.1", "34.3", "28.2", "53.3", "33.1")), row.names = c(NA, -7L
), class = c("tbl_df", "tbl", "data.frame"))
extracted_table |> gt(rowname_col = "X") |>
    cols_label(year = "Year", responserate = "Response rate (%)") |>
    cols_align("center", columns = 3) |>
    tab_footnote("Note: The response rates are calculated as RR1 rates following the definitions of AAPOR (2011)") |>
    tab_footnote("Only refreshment sample in wave 4 of PASS", locations = cells_stub("PASS")) |>
    tab_footnote("Wave 1 of the refreshment sample J (Siegel, Huber, & Bohlender 2012)",
                 locations = cells_body(columns = "year", rows = 7),
                 placement = "right") |>
    opt_footnote_marks(marks = "letters") |>
    tab_source_note(source_note = "Source: Pforr et al. (2015)")

```

The HTML output of this looks great. Namely, footnotes and source notes are left-aligned, as displayed here.

However, when I change it to have label, footnotes and source notes are centered.

The response rates of face-to-face surveys based on random samples have decreased significantly in recent years. At present, response rates of around 30% are achieved in the case of population surveys in Germany (see @tbl-example3). The response rate of PIAAC shows that higher response rates can be achieved when the resource input is very high and conditions with regard to other factors (e.g., the topic) are good.

```{r}
#| echo: false
#| label: tbl-example3
#| tbl-cap: "Response rates of face-to-face population surveys in Germany"

library(gt)

extracted_table <- structure(list(X = c("ALLBUS", "GIP", "NEPS", "Pairfam", "PASS", 
"PIAAC", "SOEP"), year = c("2010", "2012", "2011/12", "2008/09", 
"2011", "2011/12", "2011"), responserate = c("33.1", "42.9", 
"33.1", "34.3", "28.2", "53.3", "33.1")), row.names = c(NA, -7L
), class = c("tbl_df", "tbl", "data.frame"))

extracted_table |> gt(rowname_col = "X") |>
    cols_label(year = "Year", responserate = "Response rate (%)") |>
    cols_align("center", columns = 3) |>
    tab_footnote("Note: The response rates are calculated as RR1 rates following the definitions of AAPOR (2011)") |>
    tab_footnote("Only refreshment sample in wave 4 of PASS", locations = cells_stub("PASS")) |>
    tab_footnote("Wave 1 of the refreshment sample J (Siegel, Huber, & Bohlender 2012)",
                 locations = cells_body(columns = "year", rows = 7),
                 placement = "right") |>
    opt_footnote_marks(marks = "letters") |>
    tab_source_note(source_note = "Source: Pforr et al. (2015)")
```

By inspecting the generated HTML, the entire div gets quarto-figure-center class (with text-align: center) by default. tfoot.gt_footnotes and tfoot.gt_source inherit it too.

Quarto version: 1.6.39
Ubuntu Linux
R 4.4.2
gt 0.11.1

Thank you very much!

[chainsawriot]

saw this #11935