add blank line before prompting for service name to search for

ChangeLog.md

@@ -1,5 +1,9 @@
 # Changelog for passman
 
+## current
+
+- minor UI tweak
+
 ## 0.3.1.1
 
 - updated documentation to on longer mention GitHub

app/UI.hs

@@ -142,7 +142,7 @@ buildData = do
 
 searchServ :: S.StateT Status IO ()
 searchServ = do
-  svc <- req $ prompt "service name: " reqResp
+  svc <- req $ prompt "\nservice name: " reqResp
   db  <- S.gets $ view database
   case pwSearch svc db of
     []  -> do