diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-23 04:14:46 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-23 04:14:46 +0200 |
| commit | 2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd (patch) | |
| tree | c48c312e1d44306039fc00cfe4b5cd611d7f9a3b /module/vcomponent/recurrence/display.scm | |
| parent | Remove procedure tabset. (diff) | |
| download | calp-2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd.tar.gz calp-2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd.tar.xz | |
Normalize keyword syntax.
Diffstat (limited to 'module/vcomponent/recurrence/display.scm')
| -rw-r--r-- | module/vcomponent/recurrence/display.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/module/vcomponent/recurrence/display.scm b/module/vcomponent/recurrence/display.scm index 8a9f33e6..8aa9f506 100644 --- a/module/vcomponent/recurrence/display.scm +++ b/module/vcomponent/recurrence/display.scm @@ -1,10 +1,11 @@ (define-module (vcomponent recurrence display) :use-module (vcomponent recurrence display common) :use-module (hnh util language) + :use-module (srfi srfi-88) :re-export (rrule-month->string) :export (format-recurrence-rule)) -(define* (format-recurrence-rule rrule #:optional (language (resolve-language))) +(define* (format-recurrence-rule rrule optional: (language (resolve-language))) ((module-ref (resolve-interface `(vcomponent recurrence display ,language)) 'format-recurrence-rule) rrule)) |