| 123456789101112131415161718 |
- (library (handlers schedule)
- (export schedule-handler)
- (import
- (except (rnrs base) let-values error)
- (only (guile) lambda* λ)
- (lib utils response-utils)
- (templates page-wrapper)
- (templates page schedule)))
- (define schedule-handler
- (lambda (request request-body)
- "A handler for a route."
- (create-html-response
- (page-wrapper-template request
- request-body
- (page-schedule-template request request-body)))))
|
