xinclude2nix: style

1 files changed, 3 insertions, 3 deletions

diff --git a/modules/pkgs/xinclude2nix/xinclude2nix.hs b/modules/pkgs/xinclude2nix/xinclude2nix.hs
index aaf505e..369f103 100644
--- a/modules/pkgs/xinclude2nix/xinclude2nix.hs
+++ b/modules/pkgs/xinclude2nix/xinclude2nix.hs
@@ -10,14 +10,14 @@ module Main
   ( main
   ) where
 
-import Data.List (intercalate, isPrefixOf, stripPrefix)
+import Data.List (isPrefixOf, stripPrefix)
 import Data.Maybe (fromMaybe)
 import System.Environment (getArgs)
 import Text.XML.HXT.Core
        ((>>>), deep, getAttrValue, hasAttr, hasName, isElem, readDocument,
         returnA, runX)
 
-getXIncludes :: String -> IO [String]
+getXIncludes :: FilePath -> IO [String]
 getXIncludes xmlFileName =
   runX $
   readDocument [] xmlFileName >>>
@@ -40,7 +40,7 @@ unique (x:xs)
   | otherwise = x : unique xs
 
 toNix :: [String] -> String
-toNix ss = "[" ++ intercalate " " (map show ss) ++ "]"
+toNix ss = "[" ++ unwords (map show ss) ++ "]"
 
 main :: IO ()
 main = do