diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-22 22:54:18 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-22 22:54:26 +0200 |
| commit | 28f7cdc8e1cdaf022d4906b924e788ee9eb47789 (patch) | |
| tree | 1c882684f4d06cfdca19a095eaca91b0b530e1df /module/entry-points/server.scm | |
| parent | Repair ical output for keys with multiple vlines. (diff) | |
| download | calp-28f7cdc8e1cdaf022d4906b924e788ee9eb47789.tar.gz calp-28f7cdc8e1cdaf022d4906b924e788ee9eb47789.tar.xz | |
Minor coment cleanup.
Diffstat (limited to 'module/entry-points/server.scm')
| -rw-r--r-- | module/entry-points/server.scm | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/module/entry-points/server.scm b/module/entry-points/server.scm index c137a144..604766a5 100644 --- a/module/entry-points/server.scm +++ b/module/entry-points/server.scm @@ -99,7 +99,6 @@ (date day: 1)) next-start: month+ prev-start: month- - ;; internally rounds start-date to start of month render-calendar: render-calendar-table 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)) @@ -135,7 +134,6 @@ (aif end (parse-iso-date it) (current-date))) (print-all-events)))))) - ;; TODO this fails if there's a period in the uid. (GET "/calendar/:uid{.*}.ics" (uid) (aif (get-event-by-uid uid) (return '((content-type text/calendar)) |