diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-22 19:49:57 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-22 19:49:57 +0100 |
| commit | 545a053a24f32c2cb2418278ddd6077e87dfbe91 (patch) | |
| tree | a5368a75f91d5acbe2bb2561bae3bc882c04c404 /srfi/srfi-19 | |
| parent | Rename build-recur-rules to parse-recurrence-rule. (diff) | |
| download | calp-545a053a24f32c2cb2418278ddd6077e87dfbe91.tar.gz calp-545a053a24f32c2cb2418278ddd6077e87dfbe91.tar.xz | |
Change time->string default format.
Diffstat (limited to 'srfi/srfi-19')
| -rw-r--r-- | srfi/srfi-19/util.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/srfi/srfi-19/util.scm b/srfi/srfi-19/util.scm index f1346f78..a4b704b0 100644 --- a/srfi/srfi-19/util.scm +++ b/srfi/srfi-19/util.scm @@ -47,7 +47,7 @@ attribute set to 0. Can also be seen as \"Start of day\"" (define (today? time) (in-day? (current-date) time)) -(define* (time->string time #:optional (format "~c")) +(define* (time->string time #:optional (format "~1 ~3")) (date->string (time-utc->date time) format)) |