Close #54

ATFutures · Dec 20, 2019 · 527ed78 · 527ed78
1 parent 7a9cc00
commit 527ed78
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/server.R b/R/server.R
@@ -7,7 +7,8 @@
 #' @export
 # Define server logic required to draw a histogram
 shinyAppServer = function(input, output, session) {
-  if (is.na(mapdeck::mapdeck_tokens()[[1]][[1]])) {
+  mapdeck_token = mapdeck::mapdeck_tokens()[[1]][[1]]
+  if (is.null(mapdeck_token)) {
     message("No mapdeck token found on system. Trying environment variable MAPBOX")
     mapdeck::set_token(token = Sys.getenv("MAPBOX"))
   }