From 9affe8f6b3a9b07367c8c14162aecea8b15856a6 Mon Sep 17 00:00:00 2001 From: randen Date: Thu, 30 Jul 2015 14:49:08 -0700 Subject: Break the response file by line termination rather than spaces, since spaces may be within the parameters. This simple approach avoids having the need for any quoting and/or escaping (although a newline char will not be possible in a parameter and has no escape mechanism to allow it). --- driver/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'driver') diff --git a/driver/Main.hs b/driver/Main.hs index 5097a86d..ccbb8b7d 100644 --- a/driver/Main.hs +++ b/driver/Main.hs @@ -20,7 +20,7 @@ expandResponse :: [String] -> IO [String] expandResponse = fmap concat . mapM expand where expand :: String -> IO [String] - expand ('@':f) = readFileExc f >>= return . filter (not . null) . words + expand ('@':f) = readFileExc f >>= return . filter (not . null) . lines expand x = return [x] readFileExc f = -- cgit v1.2.3