diff --git a/Utility/OsPath.hs b/Utility/OsPath.hs index 9fa4e0f57e..59302cd53e 100644 --- a/Utility/OsPath.hs +++ b/Utility/OsPath.hs @@ -43,7 +43,7 @@ fromOsPath :: OsPath -> RawFilePath -- On Windows, OsString contains a ShortByteString that is -- utf-16 encoded. So have to convert the input from that. -- This is relatively expensive. -fromOsPath = toRawFilePath . cWcharsToChars_UCS2 . BS16.unpack . getWindowsString +fromOsPath = toRawFilePath . cWcharsToChars_UCS2 . BS16.unpack . getWindowsString . getOsString #else fromOsPath = S.fromShort . getPosixString . getOsString #endif