ANSI coloring now conforms to NO_CODE. closes #90

Author: markvanderloo

pkg/DESCRIPTION

@@ -23,5 +23,5 @@ URL: https://github.com/markvanderloo/tinytest
 BugReports: https://github.com/markvanderloo/tinytest/issues
 Depends: R (>= 3.0.0)
 Imports: parallel, utils
-RoxygenNote: 7.2.3
+RoxygenNote: 7.3.2
 Encoding: UTF-8

pkg/NEWS

@@ -1,4 +1,6 @@
 version 1.4.2
+- tt.pr.color is now set to FALSE when the NO_COLOR environment
+  variable is set. See https://no-color.org/
 - expect_<condition> now uses conditionMessage internally. This
   should increase compatibility with packages defining custom
   conditions. (thanks to Tim Taylor for suggesting and Etienne Bacher

pkg/R/init.R

@@ -1,9 +1,13 @@
 
 
 .onLoad <- function(libname, pkgname){
-  # turn off color printing for dumb terminals
+  # turn off color printing for dumb terminal
   term <- tolower(trimws(Sys.getenv("TERM")))
-  if ( identical( term, "dumb" ) ){
+  # turn off color when NO_COLOR is set
+  no_color <- Sys.getenv("NO_COLOR",unset=NA_character_)
+  if ( identical(term, "dumb") || 
+       identical(no_color, NA_character_)|| identical(no_color, "") ){
+
     options(tt.pr.color=FALSE)
   }
 

pkg/R/methods.R

@@ -117,8 +117,10 @@ any_fail <- function(x){
 #' }
 #' which determines whether colored output is printed.
 #' If R is running in a dumb terminal (detected by comparing 
-#' environment variable \code{"TERM"} to \code{"dumb"}), then
+#' environment variable \code{"TERM"} to \code{"dumb"}), or if the
+#' \code{NO_CODE} environment variable is set, then
 #' this option is set to \code{FALSE} when the package is loaded.
+#' See also \href{https://no-color.org}{https://no-color.org}.
 #' 
 #' @rdname tinytests 
 #' @export

pkg/inst/tinytest/test_init.R

@@ -1,9 +1,16 @@
 
-oldterm <- Sys.getenv("TERM")
 Sys.setenv(TERM = "dumb") # will be unset by tinytest
 tinytest:::.onLoad()
 expect_false(getOption("tt.pr.color"))
 
+
+
+options(tt.pr.color=NULL)
+Sys.setenv(NO_COLOR=1L)
+tinytest:::.onLoad()
+expect_false(getOption("tt.pr.color"))
+
+
 # reset option set by .onLoad()
 options(tt.pr.color=NULL)