From 483eb09a823f48b5098e0d2138dc31874449a45d Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sat, 14 Apr 2012 20:33:48 +0000 Subject: [PATCH] show proper help for balancesheet/incomestatement --- hledger/Hledger/Cli/Main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger/Hledger/Cli/Main.hs b/hledger/Hledger/Cli/Main.hs index 93b5a91cb..b9928e7b3 100644 --- a/hledger/Hledger/Cli/Main.hs +++ b/hledger/Hledger/Cli/Main.hs @@ -88,8 +88,8 @@ main = do | any (cmd `isPrefixOf`) ["entries","print"] = showModeHelpOr entriesmode $ withJournalDo opts print' | any (cmd `isPrefixOf`) ["postings","register"] = showModeHelpOr postingsmode $ withJournalDo opts register | any (cmd `isPrefixOf`) ["activity","histogram"] = showModeHelpOr activitymode $ withJournalDo opts histogram - | cmd `isPrefixOf` "incomestatement" = showModeHelpOr activitymode $ withJournalDo opts incomestatement - | any (cmd `isPrefixOf`) ["balancesheet","bs"] = showModeHelpOr activitymode $ withJournalDo opts balancesheet + | cmd `isPrefixOf` "incomestatement" = showModeHelpOr incomestatementmode $ withJournalDo opts incomestatement + | any (cmd `isPrefixOf`) ["balancesheet","bs"] = showModeHelpOr balancesheetmode $ withJournalDo opts balancesheet | cmd `isPrefixOf` "stats" = showModeHelpOr statsmode $ withJournalDo opts stats | not (null matchedaddon) = do when (debug_ opts) $ printf "running %s\n" shellcmd