Eliminate no-longer-used quoted_df

hadley · hadley · commit 85f304adf4da · 2016-10-24T10:13:20.000-05:00
diff --git a/R/facet-.r b/R/facet-.r
@@ -264,11 +264,6 @@ eval_facet_var <- function(var, data, env = emptyenv()) {
   }
 }
 
-quoted_df <- function(data, vars, env = emptyenv()) {
-  values <- plyr::eval.quoted(vars, data, env, try = TRUE)
-  as.data.frame(compact(values), optional = TRUE, stringsAsFactors = FALSE)
-}
-
 layout_null <- function() {
   data.frame(PANEL = 1, ROW = 1, COL = 1, SCALE_X = 1, SCALE_Y = 1)
 }

Original file line number	Diff line number	Diff line change
`@@ -264,11 +264,6 @@ eval_facet_var <- function(var, data, env = emptyenv()) {`
`264`	`264`	`}`
`265`	`265`	`}`
`266`	`266`
`267`		`-quoted_df <- function(data, vars, env = emptyenv()) {`
`268`		`- values <- plyr::eval.quoted(vars, data, env, try = TRUE)`
`269`		`- as.data.frame(compact(values), optional = TRUE, stringsAsFactors = FALSE)`
`270`		`-}`
`271`		`-`
`272`	`267`	`layout_null <- function() {`
`273`	`268`	`data.frame(PANEL = 1, ROW = 1, COL = 1, SCALE_X = 1, SCALE_Y = 1)`
`274`	`269`	`}`