fix(fun/🕰️): support prefixed : for indicating a tz file

We still don't support POSIX timezone descriptions and the like,
but I currently don't have the energy to support something just
for POSIX's sake.

Change-Id: Ifbfc798ebe849e886cc31964b7fbc70ff009ef29
Reviewed-on: https://cl.tvl.fyi/c/depot/+/3167
Reviewed-by: sterni <sternenseemann@systemli.org>
Tested-by: BuildkiteCI
This commit is contained in:
sterni 2021-05-31 21:23:33 +02:00
parent a69ec33aca
commit cf921bd862

View file

@ -37,7 +37,7 @@
; TODO(sterni): upstream this into local-time
(defun setup-default-timezone ()
(let* ((tz (uiop:getenv "TZ"))
(let* ((tz (remove #\: (uiop:getenv "TZ") :count 1))
(tz-dir (uiop:getenv "TZDIR"))
(tz-file (if (and tz tz-dir)
(merge-pathnames