diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-09-28 03:10:54 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-09-28 03:10:54 +0200 |
commit | 04dcab7a429d9b034d41b5aca8bd715c4826de32 (patch) | |
tree | 6678fffe9c275eb2ae0562fa2834e3b793e5aed5 /module/calp/html/view/calendar.scm | |
parent | Made timeinput checkbox needlesly fancy. (diff) | |
download | calp-04dcab7a429d9b034d41b5aca8bd715c4826de32.tar.gz calp-04dcab7a429d9b034d41b5aca8bd715c4826de32.tar.xz |
Groundwork for adding new fields from frontend.
Diffstat (limited to '')
-rw-r--r-- | module/calp/html/view/calendar.scm | 25 |
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 + )))))) |