1 files changed, 4 insertions, 1 deletions

diff --git a/lib/GnuPGAgent.hs b/lib/GnuPGAgent.hs
index d73ceed..e5f91a2 100644
--- a/lib/GnuPGAgent.hs
+++ b/lib/GnuPGAgent.hs
@@ -18,7 +18,8 @@ import Data.Bool
 import Data.Char
 import Data.Maybe
 import Data.OpenPGP
-import Data.OpenPGP.Util
+import qualified Data.OpenPGP.Util
+         ;import Data.OpenPGP.Util hiding (fingerprint)
 import Data.Word
 import Network.Socket
 import System.Directory
@@ -35,6 +36,8 @@ import ProcessUtils
 import Control.Monad.Fix
 import Control.Concurrent (threadDelay)
 
+fingerprint = show . Data.OpenPGP.Util.fingerprint
+
 data GnuPGAgent = GnuPGAgent { agentHandle :: Handle }
 
 launchAgent :: FilePath -> Maybe [(String,String)] -> IO (Maybe GnuPGAgent)