addons: another fix for addon detection on windows

This commit is contained in:
Simon Michael 2014-04-22 17:49:03 -07:00
parent b2944709c1
commit e40b587357

View File

@ -405,7 +405,7 @@ getHledgerAddonCommands = map (drop (length progname + 1)) `fmap` getHledgerExes
-- list if there is a problem. -- list if there is a problem.
getHledgerExesInPath :: IO [String] getHledgerExesInPath :: IO [String]
getHledgerExesInPath = do getHledgerExesInPath = do
pathdirs <- splitOn ":" `fmap` getEnvSafe "PATH" pathdirs <- regexSplit "[:;]" `fmap` getEnvSafe "PATH"
pathfiles <- concat `fmap` mapM getDirectoryContentsSafe pathdirs pathfiles <- concat `fmap` mapM getDirectoryContentsSafe pathdirs
let hledgernamed = let hledgernamed =
-- nubBy (\a b -> stripAddonExtension a == stripAddonExtension b) $ -- nubBy (\a b -> stripAddonExtension a == stripAddonExtension b) $