[plt-scheme] formlets...

On Tue, Sep 23, 2008 at 3:30 PM, geb a <geb_a at yahoo.com> wrote:
> The code is below:
> (require web-server/formlets/formlets)

This should be: web-server/formlets

> (define-struct date (month day))
>
> (define date-formlet
>  (formlet
>   (div
>    "Month:" ,{input-int . => . month}
>    "Day:" ,{input-int . => . day})
>   (make-date month day)))
>
> (define travel-formlet
>  (formlet
>   (div
>    "Name:" ,{input-string . => . name}
>    (div
>     "Arrive:" ,{date-formlet . => . arrive}
>     "Depart:" ,{date-formlet . => . depart})

You are missing a ) right here

>    (list name arrive depart))))

(define travel-formlet
  (formlet
   (div
    "Name:" ,{input-string . => . name}
    (div
     "Arrive:" ,{date-formlet . => . arrive}
     "Depart:" ,{date-formlet . => . depart}))
   (list name arrive depart)))

Let me know if you have more problems.

Jay

-- 
Jay McCarthy <jay at cs.byu.edu>
Assistant Professor / Brigham Young University
http://jay.teammccarthy.org

"The glory of God is Intelligence" - D&C 93