need to 'print' result of 'open_gt_table' for #5

mpadge · mpadge · commit 30cb1d13bbfd · 2023-01-10T17:16:32.000+01:00
diff --git a/R/eic-report.R b/R/eic-report.R
@@ -213,7 +213,7 @@ devguide_eic_report <- function (open = TRUE) {
     }
 
     if (open) {
-        open_gt_table (dat)
+        print (open_gt_table (dat))
     }
 
     return (dat)

Original file line number	Diff line number	Diff line change
`@@ -213,7 +213,7 @@ devguide_eic_report <- function (open = TRUE) {`
`213`	`213`	`}`
`214`	`214`
`215`	`215`	`if (open) {`
`216`		`- open_gt_table (dat)`
	`216`	`+ print (open_gt_table (dat))`
`217`	`217`	`}`
`218`	`218`
`219`	`219`	`return (dat)`