more OsPath conversion
About 1/10th done with this I think.
This commit is contained in:
parent
8021d22955
commit
c412c59ecd
16 changed files with 152 additions and 142 deletions
|
@ -30,8 +30,7 @@ modifyAutoStartFile func = do
|
|||
when (dirs' /= dirs) $ do
|
||||
f <- autoStartFile
|
||||
createDirectoryIfMissing True (parentDir f)
|
||||
viaTmp (writeFile . fromRawFilePath . fromOsPath)
|
||||
(toOsPath f)
|
||||
viaTmp (writeFile . fromRawFilePath . fromOsPath) f
|
||||
(unlines (map fromOsPath dirs'))
|
||||
|
||||
{- Adds a directory to the autostart file. If the directory is already
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue