use isSpace in lstrip (#441)
This commit is contained in:
parent
282e85c602
commit
37b7ebfe22
@ -64,7 +64,7 @@ strip = lstrip . rstrip
|
|||||||
|
|
||||||
-- | Remove leading whitespace.
|
-- | Remove leading whitespace.
|
||||||
lstrip :: String -> String
|
lstrip :: String -> String
|
||||||
lstrip = dropWhile (`elem` " \t") :: String -> String -- XXX isSpace ?
|
lstrip = dropWhile isSpace
|
||||||
|
|
||||||
-- | Remove trailing whitespace.
|
-- | Remove trailing whitespace.
|
||||||
rstrip :: String -> String
|
rstrip :: String -> String
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user