From e6301374fcbb2356e67fe08e0dabd11f8104e05c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?G=C3=A1bor=20Cs=C3=A1rdi?= <csardi.gabor@gmail.com>
Date: Sun, 28 Feb 2021 20:39:44 +0100
Subject: [PATCH] Qualify utils::readRegistry() call

---
 R/system.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/system.R b/R/system.R
index 39120816..84261405 100644
--- a/R/system.R
+++ b/R/system.R
@@ -308,7 +308,7 @@ find_loadavg_counter <- function() {
     "CurrentLanguage"
   )
   tryCatch({
-    pc <- readRegistry(key)
+    pc <- utils::readRegistry(key)
     idx <- seq(2, length(pc$Counter), by = 2)
     cnt <- structure(pc$Counter[idx], names = pc$Counter[idx - 1])
     nm <- paste0("\\", cnt["2"], "\\", cnt["44"])