From 12049652c4c766952aab9f71e2fe6ef4a9fc56fc Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jlamothe1980@gmail.com>
Date: Mon, 24 Dec 2018 12:56:03 -0500
Subject: [PATCH] display blank line before displaying password

---
 app/Main.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/app/Main.hs b/app/Main.hs
index a49be24..885a620 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -135,6 +135,7 @@ quit = return ()
 
 showPass :: String -> S.StateT Status IO ()
 showPass x = do
+  lift $ putStrLn ""
   db <- S.gets $ view database
   case pwGetService x db of
     Nothing -> lift $ putStrLn "service not found"