Closing the log promptly, rather than waiting for the custodian. (again)
svn: r58
This commit is contained in:
parent
ddb5e5ce18
commit
36c76213a0
|
@ -254,7 +254,7 @@
|
||||||
(list 'from client-ip 'to host-ip 'for (url->string uri) 'at
|
(list 'from client-ip 'to host-ip 'for (url->string uri) 'at
|
||||||
(date->string (seconds->date (current-seconds)) #t)))
|
(date->string (seconds->date (current-seconds)) #t)))
|
||||||
log-p)
|
log-p)
|
||||||
(close-output-file log-p))
|
(close-output-port log-p))
|
||||||
(semaphore-post outsem))))
|
(semaphore-post outsem))))
|
||||||
|
|
||||||
; ignore-log : sym str -> str str sym url str -> str
|
; ignore-log : sym str -> str str sym url str -> str
|
||||||
|
|
Loading…
Reference in New Issue
Block a user