Neil Van Dyke
(requirerws-html-template)(define(startreq)(response/html-template(html(header(title"advice-pin-oogly-book-r.com"))(body(h1"Today's Advice")(p"Don't run with "(%(random-list-element'("scissors""cheese graters""toilet plungers""trays of lasagna""wolves""the bulls""cats")))".")(p"Like us on Facebook for a chance to win $"(%(+100(random901)))".")))))(define(random-list-elementlst)(list-reflst(random(lengthlst))))
syntax
maybe-messagemaybe-secondsmaybe-mime-typemaybe-headersmaybe-cookiesmaybe-preamblecontent...)maybe-code =| #:codenumber?maybe-message =| #:messagebytes?maybe-seconds =| #:secondsnumber?maybe-mime-type =| #:mime-type(or/c#fbytes?)maybe-headers =| #:headers(listofheader?)maybe-cookies =| #:cookies(listofcookie?)maybe-preamble =| #:preamble(or/cbytes?string?)
Rework response/html-template to use new features in package version html-template version 2, which were developed specifically to support optimizations for this package.
Add #:ordering argument to response/html-template, probably implemented using more general support in package html-template. Once that’s finalized, implement the Content-length computation placeholder code.
Converting PLaneT web-server-xexp package to rws-html-template package in new package system.
Early initial release, since needed by RackOut.
Copyright 2013, 2016 Neil Van Dyke. This program is Free Software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License,or (at your option) any later version. This program is distributed in the hope that it will be useful, but without any warranty; without even the implied warranty of merchantability or fitness for a particular purpose. See http://www.gnu.org/licenses/ for details. For other licenses and consulting, please contact the author.