From c6eaf9abb360969888bb3f289cb28054e255823b Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Tue, 28 Mar 2017 04:48:27 -0700 Subject: [PATCH] fix BalanceView warning, get travis passing --- hledger/Hledger/Cli/BalanceView.hs | 8 -------- 1 file changed, 8 deletions(-) diff --git a/hledger/Hledger/Cli/BalanceView.hs b/hledger/Hledger/Cli/BalanceView.hs index ad9033bf5..675995d2a 100644 --- a/hledger/Hledger/Cli/BalanceView.hs +++ b/hledger/Hledger/Cli/BalanceView.hs @@ -181,11 +181,3 @@ balanceviewReport BalanceView{..} CliOpts{reportopts_=ropts, rawopts_=raw} j = d _ -> id merging (Table hLeft hTop dat) (Table hLeft' _ dat') = Table (T.Group DoubleLine [hLeft, hLeft']) hTop (dat ++ dat') - - -withoutBeginDate :: ReportOpts -> ReportOpts -withoutBeginDate = id --- withoutBeginDate ropts@ReportOpts{..} = ropts{period_=p} --- where --- p = dateSpanAsPeriod $ DateSpan Nothing (periodEnd period_) -