From 3849ba7a9dd747f1c4d69c79e20eedb5bf352fe0 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Thu, 18 Jan 2018 11:24:22 -0800
Subject: [PATCH] bal: warn that --budget -O csv doesn't work

---
 hledger/Hledger/Cli/Commands/Balance.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/hledger/Hledger/Cli/Commands/Balance.hs b/hledger/Hledger/Cli/Commands/Balance.hs
index fa486287c..8b8618200 100644
--- a/hledger/Hledger/Cli/Commands/Balance.hs
+++ b/hledger/Hledger/Cli/Commands/Balance.hs
@@ -336,8 +336,7 @@ balance opts@CliOpts{rawopts_=rawopts,reportopts_=ropts} j = do
               report = multiBalanceReport ropts (queryFromOpts d ropts) j'
               budgetReport = multiBalanceReport ropts (queryFromOpts d ropts) budget
               render = case format of
-                -- XXX: implement csv rendering
-                "csv" -> (++ "\n") . printCSV . multiBalanceReportAsCsv ropts
+                "csv"  -> const $ error' "Sorry, CSV output is not yet implemented for this kind of report."  -- TODO
                 "html" -> const $ error' "Sorry, HTML output is not yet implemented for this kind of report."  -- TODO
                 _     -> multiBalanceReportWithBudgetAsText ropts budgetReport
           writeOutput opts $ render report