m

Author: rhijmans

R/rast.R

@@ -322,7 +322,7 @@ setMethod("rast", signature(x="character"),
 			} else if (isTRUE(guessCRS)) {
 				if (crs(r) == "") {
 					e <- ext(r)
-					if ((e$xmin >= -180) && (e$xmax <= 360) && (e$ymin >= -90) && (e$ymax <= 90)) {
+					if ((e$xmin >= -180.1) && (e$xmax <= 360.1) && (e$ymin >= -90.1) && (e$ymax <= 90.1)) {
 						crs(r) <- "OGC:CRS84"
 					}
 				}

src/read_gdal.cpp

@@ -1001,7 +1001,7 @@ bool SpatRaster::constructFromFile(std::string fname, std::vector<int> subds, st
 	std::string crs = getDsWKT(poDataset);
 
 	if (crs.empty()) {
-		if (guessCRS && hasExtent && s.extent.xmin >= -180 && s.extent.xmax <= 360 && s.extent.ymin >= -90 && s.extent.ymax <= 90) {
+		if (guessCRS && hasExtent && s.extent.xmin >= -180.1 && s.extent.xmax <= 360.1 && s.extent.ymin >= -90.1 && s.extent.ymax <= 90.1) {
 			crs = "OGC:CRS84";
 			s.parameters_changed = true;
 		} else {