diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2015-03-13 02:56:36 +0100 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2015-03-13 02:56:36 +0100 |
| commit | 73b53cc317c9813bfeb5cb1a450845f0a6fb6d03 (patch) | |
| tree | 878ad466f42708523826357387ff26efb3b3078e | |
| parent | 817faa2c9d7fdbc5dbfeb243f479f9d9d9488062 (diff) | |
| download | XMonadContrib-73b53cc317c9813bfeb5cb1a450845f0a6fb6d03.tar.gz XMonadContrib-73b53cc317c9813bfeb5cb1a450845f0a6fb6d03.tar.xz XMonadContrib-73b53cc317c9813bfeb5cb1a450845f0a6fb6d03.zip | |
address warnings in P.Pass
Ignore-this: 52e03c09c4d5339085e0306044de8977
darcs-hash:20150313015636-1499c-a5e6a9954f079f1c7e973eee0aa96372b4cab6c1.gz
| -rw-r--r-- | XMonad/Prompt/Pass.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/XMonad/Prompt/Pass.hs b/XMonad/Prompt/Pass.hs index 099a1a6..4c07696 100644 --- a/XMonad/Prompt/Pass.hs +++ b/XMonad/Prompt/Pass.hs @@ -49,8 +49,8 @@ import XMonad.Prompt ( XPrompt , XPConfig , mkXPrompt , mkComplFunFromList) -import System.Directory (getDirectoryContents, getHomeDirectory) -import System.FilePath (takeBaseName, takeExtension, dropExtension, combine) +import System.Directory (getHomeDirectory) +import System.FilePath (takeExtension, dropExtension, combine) import System.Posix.Env (getEnv) import XMonad.Util.Run (runProcessWithInput) @@ -138,6 +138,7 @@ removePassword :: String -> X () removePassword passLabel = spawn $ "pass rm --force " ++ passLabel -- | Retrieve the list of passwords from the password storage 'passwordStoreDir +getPasswords :: FilePath -> IO [String] getPasswords passwordStoreDir = do files <- runProcessWithInput "find" [ passwordStoreDir, |