aboutsummaryrefslogtreecommitdiff
path: root/src/Internal/Hash.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Internal/Hash.hs')
-rw-r--r--src/Internal/Hash.hs11
1 files changed, 0 insertions, 11 deletions
diff --git a/src/Internal/Hash.hs b/src/Internal/Hash.hs
deleted file mode 100644
index 272808b..0000000
--- a/src/Internal/Hash.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-{-# LANGUAGE OverloadedStrings #-}
-module Internal.Hash where
-
-import Numeric (showHex)
-import qualified Data.ByteString as BS
-import qualified Data.ByteString.Char8 as BC
-import qualified Crypto.Hash.SHA1 as SHA1
-
-quickHash :: String -> String
-quickHash str =
- concatMap (`showHex` "") $ BS.unpack (SHA1.hash $ BC.pack str)