Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Removed serialization context customization in the wrong place |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
c1e1794f4518c1851fd366d8234af3ae |
| User & Date: | murphy 2013-06-02 15:52:06.895 |
Context
|
2013-11-24
| ||
| 22:17 | Optional direct HTTP support using soup check-in: 11d7807ffd user: murphy tags: trunk | |
|
2013-06-02
| ||
| 15:52 | Removed serialization context customization in the wrong place check-in: c1e1794f45 user: murphy tags: trunk | |
| 15:19 | The parameters table should not be part of the serialization context check-in: 853b10e568 user: murphy tags: trunk | |
Changes
Changes to webgate-core.scm.
| ︙ | ︙ | |||
470 471 472 473 474 475 476 |
405 "The access method used to request the document is not supported."
#:headers
(list
(cons "Allow" (string-join (handled-request-methods) ", "))))))
(cond
((resource-handler path)
=> (lambda (proc)
| > > | | < < < < < < < < | | 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 |
405 "The access method used to request the document is not supported."
#:headers
(list
(cons "Allow" (string-join (handled-request-methods) ", "))))))
(cond
((resource-handler path)
=> (lambda (proc)
(with-limited-continuation
(lambda ()
(current-resource-context
(%make-resource-context getenv method path))
(proc parameters)))))
(else
(make-error-response
404 "The requested resource was not found by the server.")))
(make-response 204 '()))))
output-port))
|
Changes to webgate.scm.
| ︙ | ︙ | |||
72 73 74 75 76 77 78 | (define-resource resource-handler extend-procedure procedure-data) handle-query-parameters handle-request) (import scheme chicken srfi-1 srfi-4 srfi-13 srfi-18 srfi-69 srfi-99 data-structures ports extras lolevel irregex | | | 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 | (define-resource resource-handler extend-procedure procedure-data) handle-query-parameters handle-request) (import scheme chicken srfi-1 srfi-4 srfi-13 srfi-18 srfi-69 srfi-99 data-structures ports extras lolevel irregex suspension webgate-utils) (include "webgate-core.scm")) (module webgate-suspend (current-suspension-key suspended send/suspend) |
| ︙ | ︙ |