scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make sure we close the data connection upon an error.

This commit is contained in:
sperber 2003-02-27 10:53:24 +00:00
parent 3405ab31ed
commit 118bc545b1
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
scheme/ftpd/ftpd.scm
View File

@ -1305,6 +1305,7 @@
(define (signal-error! code message) (define (signal-error! code message)
(replace-reply! code message) (replace-reply! code message)
(maybe-close-data-connection)
(signal 'ftpd-error code message)) (signal 'ftpd-error code message))
(define (register-reply! code . messages) (define (register-reply! code . messages)