summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-31 22:20:07 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-31 22:20:07 -0400
commitd04bfceaad3e96c91c7effa9cebdc0811d336278 (patch)
treed0cda684b82d86841ab92bd0035db4bfd05fd08c
parent11efa7ef609a99de2841772e415cd2808ee438b8 (diff)
more accurate type
-rw-r--r--Utility.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility.hs b/Utility.hs
index 6867f473a..47c059ded 100644
--- a/Utility.hs
+++ b/Utility.hs
@@ -110,7 +110,7 @@ boolSystem command params = do
executeFile command True params Nothing
{- Escapes a filename to be safely able to be exposed to the shell. -}
-shellEscape :: FilePath -> FilePath
+shellEscape :: FilePath -> String
shellEscape f = "'" ++ quote ++ "'"
where
-- replace ' with '"'"'