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

add: update help message

Browse Source
This commit is contained in:
Simon Michael 2010-11-16 15:09:33 +00:00
parent 49e799d9cc
commit 5d45f5b387
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

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