about summary refs log tree commit diff
path: root/fun/🕰️
diff options
context:
space:
mode:
authorsterni <sternenseemann@systemli.org>2021-05-31T19·23+0200
committersterni <sternenseemann@systemli.org>2021-06-01T22·09+0000
commitcf921bd862241e75083afd770fc1121f3bcc5be2 (patch)
treed4558990aa3bac7f071193dc544b278a148fb502 /fun/🕰️
parenta69ec33aca1dfdd7f732662d512094cb3c7e564e (diff)
fix(fun/🕰️): support prefixed `:` for indicating a tz file r/2638
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
Diffstat (limited to 'fun/🕰️')
-rw-r--r--fun/🕰️/bin.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/fun/🕰️/bin.lisp b/fun/🕰️/bin.lisp
index 8bd8aa136d7d..1f5a2b2e0518 100644
--- a/fun/🕰️/bin.lisp
+++ b/fun/🕰️/bin.lisp
@@ -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