Namespace runif() calls

Fixes #1656
r-lib · Sep 20, 2022 · d3567be · d3567be
1 parent dcada81
commit d3567be
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/R/reporter-progress.R b/R/reporter-progress.R
@@ -266,7 +266,7 @@ ProgressReporter <- R6::R6Class("ProgressReporter",
         self$rule("Terminated early", line = 2)
       }
 
-      if (!self$show_praise || runif(1) > 0.1) {
+      if (!self$show_praise || stats::runif(1) > 0.1) {
         return()
       }
 

diff --git a/R/reporter-summary.R b/R/reporter-summary.R
@@ -89,10 +89,10 @@ SummaryReporter <- R6::R6Class("SummaryReporter",
 
       self$rule("DONE", line = 2)
       if (self$show_praise) {
-        if (length(failures) == 0 && runif(1) < 0.1) {
+        if (length(failures) == 0 && stats::runif(1) < 0.1) {
           self$cat_line(colourise(praise(), "success"))
         }
-        if (length(failures) > 0 && runif(1) < 0.25) {
+        if (length(failures) > 0 && stats::runif(1) < 0.25) {
           self$cat_line(colourise(encourage(), "error"))
         }
       }