diff --git a/NEWS.md b/NEWS.md index 0f8d2711..b4dbc7db 100644 --- a/NEWS.md +++ b/NEWS.md @@ -2,6 +2,8 @@ - Added `outputArgs` parameter to `renderDataTable`, to allow width and height to be set when using interactive R Markdown documents. +- Fixed a bug in `renderDT()`'s evaluation of `...` arguments when `quoted = TRUE` (#1130). + # CHANGES IN DT VERSION 0.32 - Fixed a bug that caused the column used for grouping with the RowGroup extension to change when relocated by the ColReorder extension (thanks, @isthisthat, @mikmart, #1109). diff --git a/R/shiny.R b/R/shiny.R index 00354694..5ab541a7 100644 --- a/R/shiny.R +++ b/R/shiny.R @@ -99,7 +99,7 @@ renderDataTable = function( outputInfoEnv[["session"]] = NULL exprFunc = shiny::exprToFunction(expr, env, quoted = TRUE) - argFunc = shiny::exprToFunction(list(..., server = server), env, quoted = FALSE) + argFunc = shiny::exprToFunction(list(..., server = server), parent.frame(), quoted = FALSE) widgetFunc = function() { opts = options(DT.datatable.shiny = TRUE); on.exit(options(opts), add = TRUE) instance = exprFunc()