Skip to content

Latest commit

 

History

History
11 lines (11 loc) · 382 Bytes

doesDirectoryExist.md

File metadata and controls

11 lines (11 loc) · 382 Bytes
-- doesDirectoryExist :: FilePath -> IO Bool
on doesDirectoryExist(strPath)
    set ca to current application
    set oPath to (ca's NSString's stringWithString:strPath)'s ¬
        stringByStandardizingPath
    set {bln, v} to (ca's NSFileManager's defaultManager's ¬
        fileExistsAtPath:oPath isDirectory:(reference))
    bln and v
end doesDirectoryExist