chore: leftover from previous commits

averissimo · averissimo · commit b135b03c3027 · 2025-09-09T11:05:14.000+01:00
diff --git a/R/tm_g_distribution.R b/R/tm_g_distribution.R
@@ -1355,7 +1355,7 @@ srv_distribution <- function(id,
       )
     })
 
-    output$summary_table <- DT::renderDataTable(summary_r()[["html"]])
+    output$summary_table <- DT::renderDataTable(summary_r())
 
     tests_r <- reactive({
       q <- req(output_test_q())
@@ -1400,7 +1400,7 @@ srv_distribution <- function(id,
       )
     })
 
-    output$t_stats <- DT::renderDataTable(tests_r()[["html"]])
+    output$t_stats <- DT::renderDataTable(tests_r())
 
     # Render R code.
     source_code_r <- reactive(teal.code::get_code(req(decorated_output_q())))

Original file line number	Diff line number	Diff line change
`@@ -1355,7 +1355,7 @@ srv_distribution <- function(id,`
`1355`	`1355`	`)`
`1356`	`1356`	`})`
`1357`	`1357`
`1358`		`- output$summary_table <- DT::renderDataTable(summary_r()[["html"]])`
	`1358`	`+ output$summary_table <- DT::renderDataTable(summary_r())`
`1359`	`1359`
`1360`	`1360`	`tests_r <- reactive({`
`1361`	`1361`	`q <- req(output_test_q())`
`@@ -1400,7 +1400,7 @@ srv_distribution <- function(id,`
`1400`	`1400`	`)`
`1401`	`1401`	`})`
`1402`	`1402`
`1403`		`- output$t_stats <- DT::renderDataTable(tests_r()[["html"]])`
	`1403`	`+ output$t_stats <- DT::renderDataTable(tests_r())`
`1404`	`1404`
`1405`	`1405`	`# Render R code.`
`1406`	`1406`	`source_code_r <- reactive(teal.code::get_code(req(decorated_output_q())))`