More compat
This commit is contained in:
parent
4025776776
commit
2e90c11bd3
|
@ -5,6 +5,19 @@ conversion of X-expressions and lists with the format (cons/c bytes?
|
||||||
The compatibility binding for normalize-response is a coercion from
|
The compatibility binding for normalize-response is a coercion from
|
||||||
the OLD responses to the NEW response structure.
|
the OLD responses to the NEW response structure.
|
||||||
|
|
||||||
|
For most applications, preserving compatibility is as simple as changing:
|
||||||
|
|
||||||
|
(require web-server/servlet
|
||||||
|
web-server/servlet-env)
|
||||||
|
|
||||||
|
to
|
||||||
|
|
||||||
|
(require web-server/compat/0/servlet
|
||||||
|
web-server/compat/0/servlet-env)
|
||||||
|
|
||||||
|
However, for libraries and more complicated applications, more
|
||||||
|
detailed changes may be required.
|
||||||
|
|
||||||
Other incompatibilities introduced without compatibility bindings:
|
Other incompatibilities introduced without compatibility bindings:
|
||||||
|
|
||||||
send/formlet requires that the wrapper return an Xexpr
|
send/formlet requires that the wrapper return an Xexpr
|
||||||
|
|
17
collects/web-server/compat/0/http.rkt
Normal file
17
collects/web-server/compat/0/http.rkt
Normal file
|
@ -0,0 +1,17 @@
|
||||||
|
#lang racket/base
|
||||||
|
(require web-server/http/basic-auth
|
||||||
|
web-server/http/digest-auth
|
||||||
|
web-server/http/request-structs
|
||||||
|
"http/response-structs.rkt"
|
||||||
|
"http/cookie.rkt"
|
||||||
|
web-server/http/cookie-parse
|
||||||
|
web-server/http/redirect
|
||||||
|
web-server/http/xexpr)
|
||||||
|
(provide (all-from-out web-server/http/basic-auth
|
||||||
|
web-server/http/digest-auth
|
||||||
|
web-server/http/request-structs
|
||||||
|
"http/response-structs.rkt"
|
||||||
|
"http/cookie.rkt"
|
||||||
|
web-server/http/cookie-parse
|
||||||
|
web-server/http/redirect
|
||||||
|
web-server/http/xexpr))
|
15
collects/web-server/compat/0/servlet.rkt
Normal file
15
collects/web-server/compat/0/servlet.rkt
Normal file
|
@ -0,0 +1,15 @@
|
||||||
|
#lang racket/base
|
||||||
|
(require net/url
|
||||||
|
web-server/servlet/web-cells
|
||||||
|
web-server/http/bindings
|
||||||
|
"http.rkt"
|
||||||
|
web-server/dispatch
|
||||||
|
web-server/servlet/servlet-structs
|
||||||
|
"servlet/web.rkt")
|
||||||
|
(provide (all-from-out net/url
|
||||||
|
web-server/servlet/web-cells
|
||||||
|
web-server/http/bindings
|
||||||
|
"http.rkt"
|
||||||
|
web-server/dispatch
|
||||||
|
web-server/servlet/servlet-structs
|
||||||
|
"servlet/web.rkt"))
|
Loading…
Reference in New Issue
Block a user