From 1962b0a1374546f4d1e26bec43cd96582256e552 Mon Sep 17 00:00:00 2001 From: Leon Mergen Date: Mon, 20 Apr 2015 17:07:45 +0700 Subject: [PATCH] Fixes linting issue --- src/Data/HexString.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/HexString.hs b/src/Data/HexString.hs index 722aeff..a530a7f 100644 --- a/src/Data/HexString.hs +++ b/src/Data/HexString.hs @@ -32,7 +32,7 @@ hexString bs = | otherwise = False in if BS.all isValidHex bs - then (HexString bs) + then HexString bs else error ("Not a valid hex string: " ++ show bs) -- | Converts a 'B.Binary' to a 'HexString' value