diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-08-10 00:32:40 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-08-10 00:32:40 +0200 |
| commit | 88fce77c65613e61e27961f87d950c96229082f2 (patch) | |
| tree | 1eb2166f35368fdabe91d80c43dec99f0dcfbd47 /module/calp/html/view/calendar.scm | |
| parent | Export vline? from (vcomponent base). (diff) | |
| download | calp-88fce77c65613e61e27961f87d950c96229082f2.tar.gz calp-88fce77c65613e61e27961f87d950c96229082f2.tar.xz | |
Add comment about "bug" where calendars where missing their names.
Diffstat (limited to 'module/calp/html/view/calendar.scm')
| -rw-r--r-- | module/calp/html/view/calendar.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/calp/html/view/calendar.scm b/module/calp/html/view/calendar.scm index 031c1844..4574f517 100644 --- a/module/calp/html/view/calendar.scm +++ b/module/calp/html/view/calendar.scm @@ -255,6 +255,9 @@ `((q . (and (date/-time<=? ,(current-datetime) (prop event 'DTSTART)) + ;; TODO this seems to miss some calendars, + ;; I belive it's due to some setting X-WR-CALNAME, + ;; which is only transfered /sometimes/ into NAME. (string=? ,(->string (prop calendar 'NAME)) (or (prop (parent event) 'NAME) "")))))))) ,(prop calendar 'NAME)))) |