add: ctrl-d doesn't work on windows, suggest ctrl-c instead

This commit is contained in:
Simon Michael 2009-12-18 04:32:28 +00:00
parent 5378fc9798
commit 73ecaec6c9

View File

@ -26,7 +26,7 @@ add opts args l
| otherwise = do
hPutStrLn stderr
"Enter one or more transactions, which will be added to your ledger file.\n\
\To complete a transaction, enter . as account name. To quit, enter control-d."
\To complete a transaction, enter . as account name. To quit, press control-c."
today <- getCurrentDay
getAndAddTransactions l opts args today `catch` (\e -> unless (isEOFError e) $ ioError e)