From ee9be16599f20aef6d1d3fd15666c00452f85aba Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Mon, 21 Nov 2022 12:05:03 -0700 Subject: Format with ormolu. --- src/Rahm/Desktop/Hash.hs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'src/Rahm/Desktop/Hash.hs') diff --git a/src/Rahm/Desktop/Hash.hs b/src/Rahm/Desktop/Hash.hs index dc58d96..abce660 100644 --- a/src/Rahm/Desktop/Hash.hs +++ b/src/Rahm/Desktop/Hash.hs @@ -1,11 +1,12 @@ {-# LANGUAGE OverloadedStrings #-} + module Rahm.Desktop.Hash where -import Numeric (showHex) +import qualified Crypto.Hash.SHA1 as SHA1 import qualified Data.ByteString as BS import qualified Data.ByteString.Char8 as BC -import qualified Crypto.Hash.SHA1 as SHA1 +import Numeric (showHex) quickHash :: String -> String quickHash str = - concatMap (`showHex` "") $ BS.unpack (SHA1.hash $ BC.pack str) + concatMap (`showHex` "") $ BS.unpack (SHA1.hash $ BC.pack str) -- cgit