ftp-get ( url -- )

Vocabulary

ftp.client

Inputs

url

an object

Outputs

None

Definition

USING: accessors io.pathnames kernel ;

IN: ftp.client

: ftp-get ( url -- )
    >ftp-url [
        dup path>>
        [ nip parent-directory ftp-cwd drop ]
        [ file-name (ftp-get) ] 2bi
    ] with-ftp-client ;