Fixed wrong parentheses in FTP-APPEND
This commit is contained in:
parent
6f52781aa6
commit
a5d9b210f0
|
@ -297,9 +297,9 @@
|
|||
connection
|
||||
(lambda ()
|
||||
(ftp-send-command connection (build-command "APPE" remote-file)
|
||||
(exactly-code "150"))
|
||||
(exactly-code "150")))
|
||||
(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
|
||||
;; reply.
|
||||
|
|
Loading…
Reference in New Issue