@@ -28,7 +28,7 @@ import Data.Maybe (fromMaybe)
2828import Data.Text (Text)
2929import qualified Data.Text as T
3030import Text.Printf (printf)
31−import Data.Char (ord, isAscii)
31+import Data.Char (ord, isAscii, isSpace)
3232import System.Directory
3333import System.Environment
3434import System.Exit (ExitCode (..))
@@ -93,7 +93,7 @@ makePDF program pdfargs writer opts doc =
9393 uname <- E.catch
9494 (do (ec, sout, _) <- readProcessWithExitCode "uname" ["-o"] ""
9595 if ec == ExitSuccess
96− then return $ Just sout
96+ then return $ Just $ filter (not . isSpace) sout
9797 else return Nothing)
9898 (\(_ :: E.SomeException) -> return Nothing)
9999 if '~' `elem` tmp || uname == Just "Cygwin" -- see #5451