git-no-checkout-directory? ( directory -- ? )

Vocabulary

cli.git

Inputs

directory

an object

Outputs

?

an object

Definition

USING: io.files io.pathnames namespaces ;

IN: cli.git

: git-no-checkout-directory? ( directory -- ? )
    current-directory get prepend-path file-exists? ;