summaryrefslogtreecommitdiff
path: root/KeyRing.hs
diff options
context:
space:
mode:
authorjoe <joe@bzcan7s7awrmjbam.onion>2014-04-18 18:29:16 -0400
committerjoe <joe@bzcan7s7awrmjbam.onion>2014-04-18 18:29:16 -0400
commite5a61ddac138be9b3a9cd56a7b23811935bc738e (patch)
tree05db9d16e7345d4effb4007eedfc65f03b5f41ab /KeyRing.hs
parentae6098f2d5b77ab03b0a01d39e20e071c547fa83 (diff)
oops decodeOrFail is MIN_VERSION_binary(0,7,0) rather than
MIN_VERSION_binary(0,6,4)
Diffstat (limited to 'KeyRing.hs')
-rw-r--r--KeyRing.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/KeyRing.hs b/KeyRing.hs
index d9fae5f..4033c3b 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -1498,7 +1498,7 @@ readPacketsFromFile :: FilePath -> IO Message
1498readPacketsFromFile fname = do 1498readPacketsFromFile fname = do
1499 -- warn $ fname ++ ": reading..." 1499 -- warn $ fname ++ ": reading..."
1500 input <- L.readFile fname 1500 input <- L.readFile fname
1501#if MIN_VERSION_binary(0,6,4) 1501#if MIN_VERSION_binary(0,7,0)
1502 return $ 1502 return $
1503 case decodeOrFail input of 1503 case decodeOrFail input of
1504 Right (_,_,msg ) -> msg 1504 Right (_,_,msg ) -> msg