defined data structure for master password form

src/Password/App.hs

@@ -39,7 +39,7 @@ import Brick
 import Password.App.Types
 
 -- | The main application
-passmanApp :: App AppState () ()
+passmanApp :: App AppState () ResName
 passmanApp = App
   { appDraw         = drawFunc
   , appChooseCursor = neverShowCursor
@@ -48,10 +48,10 @@ passmanApp = App
   , appAttrMap      = const $ attrMap (style 0) []
   }
 
-drawFunc :: AppState -> [Widget ()]
+drawFunc :: AppState -> [Widget ResName]
 drawFunc = const [emptyWidget]
 
-eventHandler :: BrickEvent () () -> EventM () AppState ()
+eventHandler :: BrickEvent ResName () -> EventM ResName AppState ()
 eventHandler = const halt
 
 --jl