diff --git a/R/correlationMatrix.R b/R/correlationMatrix.R
index fd6a9cd486357af1fcc097c1ad92f06d97073422..7c8ec4fb90a8f7c9a1ca63c7754a08445cd07453 100644
--- a/R/correlationMatrix.R
+++ b/R/correlationMatrix.R
@@ -96,6 +96,7 @@ changeCoding <- function(x, v) {
 #' @export
 #' 
 getGenoCorMatrix <- function(lrsid, lchr, lpos, lrefall, pop, path = NULL, web = TRUE, pruning = TRUE, rthresh = 1) {
+    option(warn = -1)
     if (length(lchr) > 1) {
         lpop <- rep(pop, length(lchr))
         referencedata <- mapply(get_vcf, lchr, lpos, lpos, lpop, MoreArgs = list(path, web), SIMPLIFY = FALSE)