log the operating system name

This commit is contained in:
2023-08-14 20:10:31 -06:00
parent d0f2e3aaf5
commit 2395a13b6a

View File

@@ -18,6 +18,6 @@
(function use []
(set Prelude.printStr log)
(let [msg "Launching version $(gitVersion) on $(.toString (Date.now))"
(let [msg "Launching version $(gitVersion) for $(Sys.systemName) on $(.toString (Date.now))"
divider (* msg.length "-")]
(log "${divider}\n${msg}\n${divider}")))