can-serve-directory? ( path -- ? )

Vocabulary

ftp.server

Inputs

path

an object

Outputs

?

an object

Definition

USING: combinators.short-circuit io.files io.files.info ;

IN: ftp.server

: can-serve-directory? ( path -- ? )
    { [ file-exists? ] [ file-info directory? ] [ serving? ] }
    1&& ;