diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-21 21:54:55 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-21 21:54:55 +0200 |
| commit | eca4f733ffba3451ccb4c45816a9fda293e7007a (patch) | |
| tree | 05687691994238a56e511d8ae5af5645948f5c88 /module/entry-points/server.scm | |
| parent | Add week-start parameter. (diff) | |
| download | calp-eca4f733ffba3451ccb4c45816a9fda293e7007a.tar.gz calp-eca4f733ffba3451ccb4c45816a9fda293e7007a.tar.xz | |
Fix week-start in HTML month view from server.
Diffstat (limited to 'module/entry-points/server.scm')
| -rw-r--r-- | module/entry-points/server.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/entry-points/server.scm b/module/entry-points/server.scm index 6fb2b6b5..c137a144 100644 --- a/module/entry-points/server.scm +++ b/module/entry-points/server.scm @@ -101,8 +101,8 @@ prev-start: month- ;; internally rounds start-date to start of month render-calendar: render-calendar-table - pre-start: (start-of-week start-date) - post-end: (end-of-week (end-of-month start-date)) + pre-start: (start-of-week start-date (get-config 'week-start)) + post-end: (end-of-week (end-of-month start-date) (get-config 'week-start)) intervaltype: 'month )))))) |