diff options
| author | Alexander Sulfrian <alexander.sulfrian@fu-berlin.de> | 2015-02-04 20:02:31 +0100 |
|---|---|---|
| committer | Alexander Sulfrian <alexander.sulfrian@fu-berlin.de> | 2015-02-04 20:02:31 +0100 |
| commit | c5b9d799ce66afefd96e35f56406617cf6d1370e (patch) | |
| tree | afe4a0e1d08afc98b4cbf6658ca4edfa7a29872a | |
| parent | c8fe2bb1419960b5d539e73326158d1ee4381e5e (diff) | |
| download | xmonad-config-c5b9d799ce66afefd96e35f56406617cf6d1370e.tar.gz xmonad-config-c5b9d799ce66afefd96e35f56406617cf6d1370e.tar.xz xmonad-config-c5b9d799ce66afefd96e35f56406617cf6d1370e.zip | |
lib/Pass: Code style.
| -rw-r--r-- | lib/Pass.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/Pass.hs b/lib/Pass.hs index f29df27..c9b70df 100644 --- a/lib/Pass.hs +++ b/lib/Pass.hs @@ -1,4 +1,3 @@ - ----------------------------------------------------------------------------- -- | -- Module : Pass @@ -131,7 +130,11 @@ generatePassword passLabel = safeSpawn "pass" ["generate", "--force", passLabel, getPasswords :: IO [String] getPasswords = do home <- getHomeDirectory - files <- runProcessWithInput "find" [home ++ "/.password-store","-type", "f", "-name", "*.gpg", "-printf", "%P\n"] [] + files <- runProcessWithInput "find" [ + home ++ "/.password-store", + "-type", "f", + "-name", "*.gpg", + "-printf", "%P\n"] [] return $ map removeGpgExtension $ lines files removeGpgExtension :: String -> String |