diff --git a/R/KorAPConnection.R b/R/KorAPConnection.R
index 878240f..98a088f 100644
--- a/R/KorAPConnection.R
+++ b/R/KorAPConnection.R
@@ -120,7 +120,9 @@
 
 #' @import keyring
 getApiToken <- function(KorAPUrl) {
-  keyList <- tryCatch(key_list(service = apiTokenServiceName), error = function(e) return(NULL))
+    keyList <- withCallingHandlers(key_list(service = apiTokenServiceName),
+                                   warning = function(w) invokeRestart("muffleWarning"),
+                                   error = function(e) return(NULL))
   if (KorAPUrl %in% keyList)
     key_get(apiTokenServiceName, KorAPUrl)
   else