don't return [m] units if units are unknown; #2049

r-spatial · Dec 6, 2022 · 9534e4a · 9534e4a
1 parent d016301
commit 9534e4a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/crs.R b/R/crs.R
@@ -296,7 +296,7 @@ crs_parameters = function(x, with_units = TRUE) {
 		ret$ud_unit = if (isTRUE(ret$IsGeographic))
 				as_units("arc_degree") # FIXME: is this always true?
 			else if (is.null(x$units))
-				as_units("m")
+				NA_character_ #2049
 			else if (is.character(udunits_from_proj[[x$units]]))
 				as_units(udunits_from_proj[[x$units]])
 			else