diff options
| -rw-r--r-- | module/datetime.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/datetime.scm b/module/datetime.scm index 5b9a65e5..f78b7d69 100644 --- a/module/datetime.scm +++ b/module/datetime.scm @@ -700,6 +700,9 @@ month: ((@ (srfi srfi-19) date-month) d) day: ((@ (srfi srfi-19) date-day) d)))) +(define-public (current-datetime) + (unix-time->datetime ((@ (guile) current-time)))) + |