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

add: fix over-zealous cleanup caught by hydra

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

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

@ -303,6 +303,7 @@ amountCompleter = completer []
completer :: [String] -> String -> CompletionFunc IO completer :: [String] -> String -> CompletionFunc IO
completer completions def = completeWord Nothing "" completionsFor completer completions def = completeWord Nothing "" completionsFor
where where
simpleCompletion' s = (simpleCompletion s){isFinished=False}
completionsFor "" = return [simpleCompletion' def] completionsFor "" = return [simpleCompletion' def]
completionsFor i = return (map simpleCompletion' ciprefixmatches) completionsFor i = return (map simpleCompletion' ciprefixmatches)
where where