fix check

politanch · Jun 29, 2021 · b416bad · b416bad
1 parent aadb0fd
commit b416bad
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/get_swissvotes.R b/R/get_swissvotes.R
@@ -34,7 +34,7 @@ get_swissvotes <- function(DB = T, savecitation = F, codebook = F) {
 
     swissvotesDB <- download$result
 
-    if(is.na(swissvotesDB$anr) && length(swissvotesDB)==1) message(paste0(download$error))
+    if(!is.null(download$error)) message(paste0(download$error))
 
     }
   if (codebook) utils::browseURL("https://swissvotes.ch/page/dataset/codebook-de.pdf")