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

add: fix over-zealous cleanup caught by hydra, continued

Browse Source
This commit is contained in:
Simon Michael 2014-03-06 17:50:46 -08:00
parent 8e6922c57c
commit 7cbbd0fbab
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
hledger/Hledger/Cli/Add.hs
View File

@ -307,7 +307,6 @@ completer completions def = completeWord Nothing "" completionsFor
completionsFor "" = return [simpleCompletion' def] completionsFor "" = return [simpleCompletion' def]
completionsFor i = return (map simpleCompletion' ciprefixmatches) completionsFor i = return (map simpleCompletion' ciprefixmatches)
where where
simpleCompletion' s = (simpleCompletion s){isFinished=False}
ciprefixmatches = [c | c <- completions, i `isPrefixOf` c] ciprefixmatches = [c | c <- completions, i `isPrefixOf` c]
-- mixed-case completions require haskeline > 0.7.1.2 -- mixed-case completions require haskeline > 0.7.1.2
-- ciprefixmatches = [c | c <- completions, lowercase i `isPrefixOf` lowercase c] -- ciprefixmatches = [c | c <- completions, lowercase i `isPrefixOf` lowercase c]