fix build on OSX

This commit is contained in:
Joey Hess 2020-11-10 11:16:39 -04:00
parent c6604406b9
commit 278c672141
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -15,12 +15,13 @@ import Utility.FreeDesktop
import Utility.OSX import Utility.OSX
import Utility.Path import Utility.Path
import Utility.Directory import Utility.Directory
import Utility.FileSystemEncoding
#endif #endif
installAutoStart :: FilePath -> FilePath -> IO () installAutoStart :: FilePath -> FilePath -> IO ()
installAutoStart command file = do installAutoStart command file = do
#ifdef darwin_HOST_OS #ifdef darwin_HOST_OS
createDirectoryIfMissing True (parentDir file) createDirectoryIfMissing True (fromRawFilePath (parentDir file))
writeFile file $ genOSXAutoStartFile osxAutoStartLabel command writeFile file $ genOSXAutoStartFile osxAutoStartLabel command
["assistant", "--autostart"] ["assistant", "--autostart"]
#else #else