cleaned up old code

Author: topepo

R/fit.R

@@ -103,9 +103,6 @@ fit.model_spec <-
     cl <- match.call(expand.dots = TRUE)
     # Create an environment with the evaluated argument objects. This will be
     # used when a model call is made later.
-
-    # eval_env <- rlang::env_parents(rlang::pkg_env("stats"))
-    # eval_env <- rlang::new_environment(parent = rlang::base_env())
     eval_env <- rlang::env()
 
     eval_env$data <- data
@@ -187,8 +184,6 @@ fit_xy.model_spec <-
   ) {
 
     cl <- match.call(expand.dots = TRUE)
-    # eval_env <- rlang::new_environment(parent = rlang::base_env())
-    # eval_env <- rlang::env_parents(rlang::pkg_env("stats"))
     eval_env <- rlang::env()
     eval_env$x <- x
     eval_env$y <- y