From a50d2fedd775b5ab5e29802c503f3546dc1889fa Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Mon, 9 Aug 2010 23:38:35 +0000 Subject: [PATCH] docs: haddock fixes --- Hledger/Cli/Commands/Balance.hs | 14 +++++++------- Hledger/Cli/Commands/Register.hs | 8 ++++---- 2 files changed, 11 insertions(+), 11 deletions(-) diff --git a/Hledger/Cli/Commands/Balance.hs b/Hledger/Cli/Commands/Balance.hs index 46e722abb..f27491cd6 100644 --- a/Hledger/Cli/Commands/Balance.hs +++ b/Hledger/Cli/Commands/Balance.hs @@ -117,16 +117,16 @@ import System.IO.UTF8 -- | A balance report is a chart of accounts with balances, and their grand total. -type BalanceReport = ([BalanceReportItem] -- ^ line items, one per account - ,MixedAmount -- ^ total balance of all accounts +type BalanceReport = ([BalanceReportItem] -- line items, one per account + ,MixedAmount -- total balance of all accounts ) -- | The data for a single balance report line item, representing one account. -type BalanceReportItem = (AccountName -- ^ full account name - ,AccountName -- ^ account name elided for display: the leaf name, - -- prefixed by any boring parents immediately above - ,Int -- ^ account depth within this report, excludes boring parents - ,MixedAmount) -- ^ account balance, includes subs unless --flat is present +type BalanceReportItem = (AccountName -- full account name + ,AccountName -- account name elided for display: the leaf name, + -- prefixed by any boring parents immediately above + ,Int -- account depth within this report, excludes boring parents + ,MixedAmount) -- account balance, includes subs unless --flat is present -- | Print a balance report. balance :: [Opt] -> [String] -> Journal -> IO () diff --git a/Hledger/Cli/Commands/Register.hs b/Hledger/Cli/Commands/Register.hs index 5f502a2bd..7641234d6 100644 --- a/Hledger/Cli/Commands/Register.hs +++ b/Hledger/Cli/Commands/Register.hs @@ -28,12 +28,12 @@ import Text.ParserCombinators.Parsec -- | A register report is a list of postings to an account or set of -- accounts, with a running total. Postings may be actual postings, or -- virtual postings aggregated over a reporting interval. -type RegisterReport = [RegisterReportItem] -- ^ line items, one per posting +type RegisterReport = [RegisterReportItem] -- line items, one per posting -- | The data for a single register report line item, representing one posting. -type RegisterReportItem = (Maybe (Day, String) -- ^ transaction date and description if this is the first posting - ,Posting -- ^ the posting - ,MixedAmount -- ^ balance so far +type RegisterReportItem = (Maybe (Day, String) -- transaction date and description if this is the first posting + ,Posting -- the posting + ,MixedAmount -- balance so far ) -- | Print a register report.