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

Fixed wrong parentheses in FTP-APPEND

This commit is contained in:
mainzelm 2003-10-21 05:44:56 +00:00
parent 6f52781aa6
commit a5d9b210f0
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
scheme/lib/ftp.scm
View File

@ -297,9 +297,9 @@
connection connection
(lambda () (lambda ()
(ftp-send-command connection (build-command "APPE" remote-file) (ftp-send-command connection (build-command "APPE" remote-file)
(exactly-code "150")) (exactly-code "150")))
(lambda (data-socket) (lambda (data-socket)
(act (socket:outport data-socket)))))) (act (socket:outport data-socket)))))
;; send a command verbatim to the remote server and wait for a ;; send a command verbatim to the remote server and wait for a
;; reply. ;; reply.