whitespace

1 files changed, 3 insertions, 3 deletions

diff --git a/lib/KeyRing/BuildKeyDB.hs b/lib/KeyRing/BuildKeyDB.hs
index a2fdfd2..5e90655 100644
--- a/lib/KeyRing/BuildKeyDB.hs
+++ b/lib/KeyRing/BuildKeyDB.hs
@@ -183,12 +183,12 @@ buildKeyDB ctx grip0 keyring = do
 
             -- | spilled
             --    ring packets with info available for export
-            -- | unspilled 
+            -- | unspilled
             --    the rest
             (spilled,unspilled) = Map.partition (spillable . fst) ringPackets
 
             -- | keys
-            -- process ringPackets, and get a map of fingerprint info to 
+            -- process ringPackets, and get a map of fingerprint info to
             -- to a packet, remembering it's original file, access.
             keys :: Map.Map KeyKey (OriginMapped Query)
             mwk :: Maybe MappedPacket
@@ -231,7 +231,7 @@ buildKeyDB ctx grip0 keyring = do
         in fmap sequenceA $ Traversable.traverse (uncurry trans) $ Map.mapWithKey (,) spilled
 #endif
     try transformed0 $ \transformed -> do
-    let -- | db_rings - all keyrings combined into one 
+    let -- | db_rings - all keyrings combined into one
         db_rings :: Map.Map KeyKey KeyData
         db_rings = Map.foldlWithKey' mergeIt Map.empty transformed
                     where