diff --git a/R/12-manitoba-prep.R b/R/12-manitoba-prep.R
index da56b88..3e9cfd4 100644
--- a/R/12-manitoba-prep.R
+++ b/R/12-manitoba-prep.R
@@ -17,7 +17,7 @@ bounds <- ne_download(
 	returnclass = 'sf'
 )
 
-keepAdmin <- c('United States of America', 'Canada')
+keepAdmin <- c('United States of America', 'Canada', 'Greenland')
 
 keepb <- bounds[bounds$admin %in% keepAdmin,]
 
diff --git a/R/13-manitoba-figure.R b/R/13-manitoba-figure.R
index b79ca9a..d2c74bf 100644
--- a/R/13-manitoba-figure.R
+++ b/R/13-manitoba-figure.R
@@ -28,7 +28,7 @@ source('R/00-palette.R')
 ## Theme
 themeMap <- theme(panel.border = element_rect(size = 1, fill = NA),
 									panel.background = element_rect(fill = watercol),
-									panel.grid = element_line(color = gridcol, size = 0.3),
+									panel.grid = element_line(color = gridcol, size = 0.2),
 									axis.text = element_text(size = 11, color = 'black'),
 									axis.title = element_blank())
 
@@ -43,7 +43,7 @@ mb <- bounds[bounds$name_en == 'Manitoba',]
 bb <- st_bbox(st_buffer(mb, 2.5e6))
 
 gmb <- ggplot() +
-	geom_sf(fill = islandcol, color = 'black', size = 0.2, data = bounds) +
+	geom_sf(fill = islandcol, color = 'black', size = 0.1, data = bounds) +
 	geom_sf(fill = '#cd0001', color = NA, alpha = 0.3, data = mb) +
 	geom_sf(fill = watercol, color = streamcol, size = 0.1, data = lakes) +
 	guides(color = FALSE, fill = FALSE) +
diff --git a/graphics/13-manitoba.png b/graphics/13-manitoba.png
index a22eeda..1c8d0ec 100644
Binary files a/graphics/13-manitoba.png and b/graphics/13-manitoba.png differ
diff --git a/output/manitoba-bounds.gpkg b/output/manitoba-bounds.gpkg
index 6c4d470..90b96a0 100644
Binary files a/output/manitoba-bounds.gpkg and b/output/manitoba-bounds.gpkg differ