cleanup: remove logger calls

Author: averissimo

R/qenv-eval_code.R

@@ -33,7 +33,6 @@
 setGeneric("eval_code", function(object, code, cache = FALSE, ...) standardGeneric("eval_code"))
 
 setMethod("eval_code", signature = c("qenv"), function(object, code, cache = FALSE, ...) {
-  logger::log_fatal("eval_code with ANY")
   code <- .preprocess_code(code) # preprocess code to ensure it is a character vector
   parsed_code <- parse(text = code, keep.source = TRUE)
   object@.xData <- rlang::env_clone(object@.xData, parent = parent.env(.GlobalEnv))
@@ -98,7 +97,6 @@ setMethod("eval_code", signature = c("qenv"), function(object, code, cache = FAL
 
 
 setMethod("eval_code", signature = c("qenv", "expression"), function(object, code, cache = FALSE, ...) {
-  logger::log_fatal("eval_code with expression")
   srcref <- attr(code, "wholeSrcref")
   if (length(srcref)) {
     eval_code(object, code = paste(attr(code, "wholeSrcref"), collapse = "\n"))
@@ -117,12 +115,10 @@ setMethod("eval_code", signature = c("qenv", "expression"), function(object, cod
 setGeneric(".preprocess_code", function(code) standardGeneric(".preprocess_code"))
 
 setMethod(".preprocess_code", signature = c("ANY"), function(code) {
-  logger::log_warn("process character")
   as.character(code)
 })
 
 setMethod(".preprocess_code", signature = c("language"), function(code) {
-  logger::log_warn("process language")
   paste(vapply(lang2calls(code), deparse1, collapse = "\n", character(1L)))
 })