aboutsummaryrefslogtreecommitdiff
path: root/module/calp/html/view/calendar.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/calp/html/view/calendar.scm')
-rw-r--r--module/calp/html/view/calendar.scm25
1 files changed, 24 insertions, 1 deletions
diff --git a/module/calp/html/view/calendar.scm b/module/calp/html/view/calendar.scm
index a583d82b..64986b5c 100644
--- a/module/calp/html/view/calendar.scm
+++ b/module/calp/html/view/calendar.scm
@@ -296,4 +296,27 @@
;; TODO merge this into the event-set, add attribute
;; for non-displaying elements.
(div (@ (class "template") (id "popup-template"))
- ,(popup event (string-append "popup" (html-id event)))))))))
+ ,(popup event (string-append "popup" (html-id event))))))
+
+ ;; Auto-complets when adding new fields to a component
+ ;; Any string is however still valid.
+ (datalist (@ (id "known-fields"))
+ ,@(map (lambda (f)
+ `(option (@ (value ,f))))
+ '(CALSCALE
+ METHOD PRODID VERSION ATTACH
+ CATEGORIES CLASS COMMENT
+ DESCRIPTION GEO LOCATION
+ PERCENT-COMPLETE PRIORITY
+ RESOURCES STATUS SUMMARY
+ COMPLETED DTEND DUE DTSTART
+ DURATION FREEBUSY
+ TRANSP TZID TZNAME
+ TZOFFSETFROM TZOFFSETTO
+ TZURL ATTENDEE CONTACT
+ ORGANIZER RECURRENCE-ID
+ RELATED-TO URL EXDATE
+ RDATE RRULE ACTION REPEAT
+ TRIGGER CREATED DTSTAMP LAST-MODIFIED
+ SEQUENCE REQUEST-STATUS
+ ))))))