diff options
Diffstat (limited to 'module/datetime.scm')
| -rw-r--r-- | module/datetime.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/datetime.scm b/module/datetime.scm index 1141aa64..a0b1e533 100644 --- a/module/datetime.scm +++ b/module/datetime.scm @@ -462,8 +462,8 @@ ;; @example ;; (weekday-list sun) ;; => (0 1 2 3 4 5 6) -;; @end example -(define-public (weekday-list week-start) +;; @end exampl +(define*-public (weekday-list optional: (week-start (week-start))) (take (drop (apply circular-list (iota 7)) week-start) 7)) |