allow osVersion to be NULL (#850)

MichaelChirico · web-flow · commit edf56629135e · 2025-10-11T07:17:41.000-04:00
diff --git a/R/zzz.R b/R/zzz.R
@@ -72,10 +72,11 @@
 
 .onAttach <- function(libname, pkgname) {
   if (interactive()) {
+    os_version <- utils::osVersion
     packageStartupMessage(
       "TileDB R ", packageVersion("tiledb"),
       " with TileDB Embedded ", format(tiledb_version(TRUE)),
-      " on ", utils::osVersion,
+      " on ", if (is.null(os_version)) "<unknown OS>" else os_version,
       ".\nSee https://tiledb.com for more information about TileDB."
     )
   }

Original file line number	Diff line number	Diff line change
`@@ -72,10 +72,11 @@`
`72`	`72`
`73`	`73`	`.onAttach <- function(libname, pkgname) {`
`74`	`74`	`if (interactive()) {`
	`75`	`+ os_version <- utils::osVersion`
`75`	`76`	`packageStartupMessage(`
`76`	`77`	`"TileDB R ", packageVersion("tiledb"),`
`77`	`78`	`" with TileDB Embedded ", format(tiledb_version(TRUE)),`
`78`		`- " on ", utils::osVersion,`
	`79`	`+ " on ", if (is.null(os_version)) "<unknown OS>" else os_version,`
`79`	`80`	`".\nSee https://tiledb.com for more information about TileDB."`
`80`	`81`	`)`
`81`	`82`	`}`