diff options
Diffstat (limited to 'Remote.hs')
-rw-r--r-- | Remote.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -188,7 +188,7 @@ configToKeyVal m = map toword $ sort $ M.toList m toword (k, v) = k ++ "=" ++ configEscape v configEscape :: String -> String -configEscape = concat . (map escape) +configEscape = (>>= escape) where escape c | isSpace c || c `elem` "&" = "&" ++ show (ord c) ++ ";" |