blob: 617350fe171119d005352f18e131ec2980735e1f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
(use-modules (jakob theme)
(jakob utils sxml))
(theme
#:title "You've Been Invited to an Event!"
#:content
`((div (@ (id "rsvp"))
(div (@ (id "loading"))
,(image "hourglass.gif")
(p "Loading..."))
(div (@ (id "event-info")))
(form (@ (id "rsvp-input") (hidden #t))
(fieldset
(legend "Your Info")
(label (@ (for "name")) "Name:")
(input (@ (type "text") (id "name") (name "name") (required #t) (size 24)))
(label (@ (for "email")) "Email:")
(input (@ (type "text") (id "email") (name "email") (required #t) (size 24))))
(fieldset
(legend "RSVP Status")
(input (@ (type "radio") (id "attending") (name "rsvp")))
(label (@ (for "attending")) "Attending")
(input (@ (type "radio") (id "tentative") (name "rsvp")))
(label (@ (for "tentative")) "Tentative")
(input (@ (type "radio") (id "not-attending") (name "rsvp")))
(label (@ (for "not-attending")) "Not Attending"))
(fieldset
(legend "Guests")
(div (@ (id "guest-view")))
(input (@ (type "button") (id "add-entry") (value "+")))
(input (@ (type "button") (id "remove-entry") (value "-"))))
(fieldset
(legend "All Set?")
(input (@ (type "button") (id "submit-form") (value "Submit")))))
(div (@ (id "rsvp-global"))))
,(script "rsvp.js")))
|
