diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-02-16 00:41:30 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-02-16 00:44:51 -0400 |
| commit | a1e52f0ce5984058c737ed709fc5d4b6398e019a (patch) | |
| tree | baaeb46b5eb5e7edb4a8a4ef80d6c1ab256bbcba /Logs/Remote.hs | |
| parent | e7aaa55c53fb54c6dd5a1a1aeb0955b05227676b (diff) | |
hlint
Diffstat (limited to 'Logs/Remote.hs')
| -rw-r--r-- | Logs/Remote.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Logs/Remote.hs b/Logs/Remote.hs index d9b41d8c4..c38a05c18 100644 --- a/Logs/Remote.hs +++ b/Logs/Remote.hs @@ -79,7 +79,7 @@ configUnEscape = unescape num = takeWhile isNumber s r = drop (length num) s rest = drop 1 r - ok = not (null num) && take 1 r == ";" + ok = not (null num) && ":" `isPrefixOf` r {- for quickcheck -} prop_idempotent_configEscape :: String -> Bool |