Overview
| Comment: | I guess close-idle-connections is not available? don't get it but getting rid of it... |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.80 | v1.8005 |
| Files: | files | file ages | folders |
| SHA1: |
d310aee913339cce2c424b4c90ee58a0 |
| User & Date: | mrwellan on 2023-01-13 13:37:44 |
| Other Links: | branch diff | manifest | tags |
Context
|
2023-01-16
| ||
| 03:32 | Isolated fix from v1.80-disconnected-tests for TCP ports issue (not tested yet) check-in: da2bac2043 user: matt tags: v1.80 | |
| 03:21 | Merged v1.80 Leaf check-in: ccccfdb50a user: matt tags: v1.80-disconnect-tests | |
|
2023-01-13
| ||
| 13:37 | I guess close-idle-connections is not available? don't get it but getting rid of it... check-in: d310aee913 user: mrwellan tags: v1.80, v1.8005 | |
| 08:22 | Yet another db in transaction problem fixed. check-in: 95b6039c92 user: matt tags: v1.80 | |
Changes
Modified http-transport.scm from [4037b30aac] to [fc1493c705].
| ︙ | ︙ | |||
356 357 358 359 360 361 362 | (let ((api-dat (http-transport:server-dat-get-api-uri server-dat))) (handle-exceptions exn (begin (print-call-chain *default-log-port*) (debug:print-error 0 *default-log-port* " closing connection failed with error: " ((condition-property-accessor 'exn 'message) exn) ", exn=" exn)) (close-connection! api-dat) | | | 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 |
(let ((api-dat (http-transport:server-dat-get-api-uri server-dat)))
(handle-exceptions
exn
(begin
(print-call-chain *default-log-port*)
(debug:print-error 0 *default-log-port* " closing connection failed with error: " ((condition-property-accessor 'exn 'message) exn) ", exn=" exn))
(close-connection! api-dat)
;; (close-idle-connections!)
(remote-conndat-set! runremote #f)
#t))
#f)))
(define (make-http-transport:server-dat)(make-vector 6))
(define (http-transport:server-dat-get-iface vec) (vector-ref vec 0))
|
| ︙ | ︙ |