mpo/xmonad-config
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Rename selectPassword to copyPassword

Browse source
This commit is contained in:
Martin Potier 2019-09-25 10:03:38 +03:00
parent 1fba240b51
commit c0dba2d167
No known key found for this signature in database
GPG key ID: D4DD957DBA4AD89E
1 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lib/Password.hs
View file

@ -33,7 +33,7 @@ passGeneratePrompt :: XPConfig -> X ()
passGeneratePrompt _ = return () -- Not implemented passGeneratePrompt _ = return () -- Not implemented
passPrompt :: XPConfig -> X () passPrompt :: XPConfig -> X ()
passPrompt = mkPassPrompt "Select password" selectPassword passPrompt = mkPassPrompt "Select password" copyPassword
mkPassPrompt :: String -> (String -> X ()) -> XPConfig -> X () mkPassPrompt :: String -> (String -> X ()) -> XPConfig -> X ()
mkPassPrompt label f conf = do mkPassPrompt label f conf = do
@ -51,6 +51,5 @@ mkPassPrompt label f conf = do
files <- runProcessWithInput "find" [ passwordStoreDir, "-type", "f", "-name", "*.gpg", "-printf", "%p\n"] [] files <- runProcessWithInput "find" [ passwordStoreDir, "-type", "f", "-name", "*.gpg", "-printf", "%p\n"] []
return . lines $ files return . lines $ files
selectPassword :: String -> X () copyPassword :: String -> X ()
selectPassword pass = spawn $ "gpg --decrypt " ++ pass ++ " | /home/eeva/.nix-profile/bin/copy" copyPassword pass = spawn $ "gpg --decrypt " ++ pass ++ " | /home/eeva/.nix-profile/bin/copy"