Differences From Artifact [c1f69a9798]:
- File http-transport.scm — part of check-in [99ca17a0cc] at 2013-04-22 16:38:28 on branch development — Fixed issue with server record not reflecting actual server when have port collisions. (user: mrwellan, size: 13209) [annotate] [blame] [check-ins using] [more...]
To Artifact [b18abed8cd]:
- File http-transport.scm — part of check-in [f6ec489c16] at 2013-04-23 13:37:01 on branch v1.54 — Set transport type to fs if fail to connect to server (user: mrwellan, size: 13240) [annotate] [blame] [check-ins using]
︙ | |||
191 192 193 194 195 196 197 198 199 200 201 202 203 204 | 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 | + | (begin (debug:print-info 2 "Logged in and connected to " iface ":" port) (set! *runremote* serverdat) serverdat) (begin (debug:print-info 2 "Failed to login or connect to " iface ":" port) (set! *runremote* #f) (set! *transport-type* 'fs) #f)))) ;; run http-transport:keep-running in a parallel thread to monitor that the db is being ;; used and to shutdown after sometime if it is not. ;; (define (http-transport:keep-running) |
︙ |