Update R/tm_t_crosstable.R

m7pr · averissimo · web-flow · commit 4eed08b58d9a · 2024-11-21T15:15:29.000+01:00
Co-authored-by: André Veríssimo &lt;211358+averissimo@users.noreply.github.com&gt;
Signed-off-by: Marcin &lt;133694481+m7pr@users.noreply.github.com&gt;
diff --git a/R/tm_t_crosstable.R b/R/tm_t_crosstable.R
@@ -444,7 +444,7 @@ srv_t_crosstable <- function(id, data, reporter, filter_panel_api, label, x, y,
           card$append_text("Comment", "header3")
           card$append_text(comment)
         }
-        card$append_src(teal.code::get_code(req(decorated_output_q_build())))
+        card$append_src(teal.code::get_code(req(decorated_output_q())))
         card
       }
       teal.reporter::simple_reporter_srv("simple_reporter", reporter = reporter, card_fun = card_fun)

Original file line number	Diff line number	Diff line change
`@@ -444,7 +444,7 @@ srv_t_crosstable <- function(id, data, reporter, filter_panel_api, label, x, y,`
`444`	`444`	`card$append_text("Comment", "header3")`
`445`	`445`	`card$append_text(comment)`
`446`	`446`	`}`
`447`		`- card$append_src(teal.code::get_code(req(decorated_output_q_build())))`
	`447`	`+ card$append_src(teal.code::get_code(req(decorated_output_q())))`
`448`	`448`	`card`
`449`	`449`	`}`
`450`	`450`	`teal.reporter::simple_reporter_srv("simple_reporter", reporter = reporter, card_fun = card_fun)`