Welcome to the CHICKEN Scheme pasting service

no title added by JazzyEagle on Wed Nov 9 14:28:16 2016

(use awful)
(enable-sxml #t)

(define login-page
  (lambda ()
    `(form (@ (method "post")
              (action ,(make-pathname app-root-path "login-trampoline")))
      (h1 "Creative Commons Radio")
      (p "Please login to access your account, rate songs, and more!")
      (label "User Handle: ")
      (input (@ (type "text") (name "user")))
      (label "Password: ")
      (input (@ (type "password") (name "password")))
      (input (@ (type "submit") (value "Submit"))))))

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which module provides `string-intersperse'?
Visually impaired? Let me spell it for you (wav file) download WAV