copy-to-dir ( args -- )

Vocabulary

tools.copy

Inputs

args

an object

Outputs

None

Definition

USING: io.directories io.files.info kernel sequences ;

IN: tools.copy

: copy-to-dir ( args -- )
    dup last file-info directory?
    [ unclip-last copy-files-into ] [ drop usage ] if ;