From 8e527c8b5d9f41fb1ef8fbd98396d57635ac4314 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Sun, 5 Apr 2020 23:36:42 +0200 Subject: Introduce datetime->unix-time and back. --- module/datetime/util.scm | 1 + 1 file changed, 1 insertion(+) (limited to 'module/datetime') diff --git a/module/datetime/util.scm b/module/datetime/util.scm index 059308e6..a3e4eacc 100644 --- a/module/datetime/util.scm +++ b/module/datetime/util.scm @@ -133,6 +133,7 @@ ((#\m) (format #t "~2'0d" (month date))) ((#\d) (format #t "~2'0d" (day date))) ;; Should be same as ~_d + ((#\s) (display (datetime->unix-time datetime))) ; epoch time! ((#\e) (format #t "~2' d" (day date))) ((#\1) (format #t "~4'0d-~2'0d-~2'0d" (year date) (month date) (day date))) -- cgit v1.2.3