diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-10 21:08:08 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-10 21:08:08 +0200 |
commit | f6e157c45f7914188ed2deeb33581f2546be79ec (patch) | |
tree | 2e247f8d9972def68358bf43ea377ff9d245e19c /module/datetime.scm | |
parent | Actually delete old html-search. (diff) | |
download | calp-f6e157c45f7914188ed2deeb33581f2546be79ec.tar.gz calp-f6e157c45f7914188ed2deeb33581f2546be79ec.tar.xz |
Remove dependency from view/calendar -> datetime.
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)) |