Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (load "~/quicklisp/setup.lisp")
- (ql:quickload :cl-ftp)
- (defpackage :example
- (:use :cl
- :ftp))
- (in-package :example)
- ; Works
- (with-ftp-connection (conn :hostname "ftp.ncdc.noaa.gov" :passive-ftp-p t)
- (retrieve-file "pub/data/noaa/readme.txt" "./readme.txt"))
- ; Does not work - I am expecting an ftp:ftp-error in this case but instead it hangs forever
- (with-ftp-connection (conn :hostname "ftp.ncdc.noaa.gov" :passive-ftp-p t)
- (retrieve-file "pub/data/noaa/fake-file-does-not-exist.txt" "./file.txt"))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement