From b583cb327d38094269d82303df233311302c3336 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sun, 8 May 2016 20:55:59 -0700
Subject: [PATCH] lib: fix a warning

---
 hledger-lib/Hledger/Read/JournalReader.hs | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/hledger-lib/Hledger/Read/JournalReader.hs b/hledger-lib/Hledger/Read/JournalReader.hs
index c24a89105..a18641d28 100644
--- a/hledger-lib/Hledger/Read/JournalReader.hs
+++ b/hledger-lib/Hledger/Read/JournalReader.hs
@@ -364,12 +364,12 @@ accountdirectivep = do
   pushAccount acct
   return $ ExceptT $ return $ Right id
 
--- | Terminate parsing entirely, returning the given error message
--- with the current parse position prepended.
-parserError :: String -> ErroringJournalParser a
-parserError s = do
-  pos <- getPosition
-  parserErrorAt pos s
+-- -- | Terminate parsing entirely, returning the given error message
+-- -- with the current parse position prepended.
+-- parserError :: String -> ErroringJournalParser a
+-- parserError s = do
+--   pos <- getPosition
+--   parserErrorAt pos s
 
 -- | Terminate parsing entirely, returning the given error message
 -- with the given parse position prepended.