fixes #16

ATFutures · Nov 20, 2019 · fbde2ef · fbde2ef
1 parent 65f1523
commit fbde2ef
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/server.R b/R/server.R
@@ -32,8 +32,7 @@ shinyAppServer = function(input, output, session) {
     )
   )
 
-  # Defaults to first 'city', so should load that data by default
-  net <<- readRDS(system.file("net-accra.Rds", package = "upthat"))
+  net <<- readRDS(system.file("net-kathmandu.Rds", package = "upthat"))
   net$layer <- net$flow
   rds_files_available = list.files(path = "inst", pattern = ".Rds", full.names = TRUE)