slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions 2 Packages Projects Releases Wiki Activity

cli: don't list both source and exe of an addon

Browse Source
This commit is contained in:
Simon Michael 2014-03-16 09:27:07 -07:00
parent d1b9273b19
commit 88d52a9da8
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
hledger/Hledger/Cli/Options.hs
View File

@ -565,7 +565,8 @@ getHledgerExesInPath :: IO [String]
getHledgerExesInPath = do getHledgerExesInPath = do
pathdirs <- splitOn ":" `fmap` getEnvSafe "PATH" pathdirs <- splitOn ":" `fmap` getEnvSafe "PATH"
pathfiles <- concat `fmap` mapM getDirectoryContentsSafe pathdirs pathfiles <- concat `fmap` mapM getDirectoryContentsSafe pathdirs
let hledgernamed = nub $ sort $ filter isHledgerExeName pathfiles let hledgernamed = nubBy (\a b -> striphs a == striphs b) $ sort $ filter isHledgerExeName pathfiles
where striphs = regexReplace "\\.l?hs$" ""
-- hledgerexes <- filterM isExecutable hledgernamed -- hledgerexes <- filterM isExecutable hledgernamed
return hledgernamed return hledgernamed