From 5984846100ebfc4b7e90075b668c1acdf12e900c Mon Sep 17 00:00:00 2001
From: joe <joe@jerkface.net>
Date: Tue, 29 Apr 2014 00:46:25 -0400
Subject: Oops, handle empty keyring files.

---
 KeyRing.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/KeyRing.hs b/KeyRing.hs
index f7b4ec8..52635be 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -997,6 +997,7 @@ buildKeyDB doDecrypt secring pubring grip0 keyring = do
                                 case ps of
                                     Message ((PublicKeyPacket {}):_) -> Pub
                                     Message ((SecretKeyPacket {}):_) -> Sec
+                                    _                                -> AutoAccess
                             acc -> acc
 
         readw wk n = fmap (n,) (readPacketsFromWallet wk n)
-- 
cgit v1.2.3