Fixes linting issue

This commit is contained in:
Leon Mergen 2015-04-20 17:07:45 +07:00
parent bcad9d0b8c
commit 1962b0a137

View file

@ -32,7 +32,7 @@ hexString bs =
| otherwise = False | otherwise = False
in if BS.all isValidHex bs in if BS.all isValidHex bs
then (HexString bs) then HexString bs
else error ("Not a valid hex string: " ++ show bs) else error ("Not a valid hex string: " ++ show bs)
-- | Converts a 'B.Binary' to a 'HexString' value -- | Converts a 'B.Binary' to a 'HexString' value