Showing 1 of 1 files from the diff.

@@ -39,7 +39,8 @@
Loading
39 39
  email_add_token(email, token)
40 40
  message("Token added for ", sQuote(email))
41 41
  cat("\n")
42 -
42 +
  token_file_msg()
43 +
  cat("\n")
43 44
  invisible()
44 45
}
45 46
@@ -139,6 +140,10 @@
Loading
139 140
list_validated_emails2 <- function(msg_if_empty = TRUE) {
140 141
  file <- email_file()
141 142
  res <- if (file.exists(file)) {
143 +
    if (is_interactive()) {
144 +
      token_file_msg()
145 +
    }
146 +
    
142 147
    structure(
143 148
      read.csv(file, stringsAsFactors = FALSE, header = FALSE),
144 149
      names = c("email", "token")
@@ -218,3 +223,14 @@
Loading
218 223
219 224
  invisible()
220 225
}
226 +
227 +
token_file_msg <- function() {
228 +
  message(
229 +
    crayon::green(
230 +
      paste0(
231 +
        "For info the token(s) and email(s) are stored at ",
232 +
        email_file()
233 +
      )
234 +
    )
235 +
  )
236 +
}
Files Coverage
R 27.75%
Project Totals (26 files) 27.75%
Sunburst
The inner-most circle is the entire project, moving away from the center are folders then, finally, a single file. The size and color of each slice is representing the number of statements and the coverage, respectively.
Icicle
The top section represents the entire project. Proceeding with folders and finally individual files. The size and color of each slice is representing the number of statements and the coverage, respectively.
Grid
Each block represents a single file in the project. The size and color of each block is represented by the number of statements and the coverage, respectively.
Loading