diff --git a/hledger/Hledger/Cli/CliOptions.hs b/hledger/Hledger/Cli/CliOptions.hs index 69dae5863..70284c740 100644 --- a/hledger/Hledger/Cli/CliOptions.hs +++ b/hledger/Hledger/Cli/CliOptions.hs @@ -745,7 +745,7 @@ compiledExts = ["",".com",".exe"] -- We do not currently filter out non-file objects or files without execute permission. likelyExecutablesInPath :: IO [String] likelyExecutablesInPath = do - pathdirs <- splitOneOf "[:;]" `fmap` getEnvSafe "PATH" + pathdirs <- splitOneOf ":;" `fmap` getEnvSafe "PATH" pathfiles <- concat `fmap` mapM getDirectoryContentsSafe pathdirs return $ nubSort pathfiles -- exclude directories and files without execute permission.