From ccac09fb1b1a060059f1defb779a5374a71b53f6 Mon Sep 17 00:00:00 2001
From: Henning Thielemann <git@henning-thielemann.de>
Date: Fri, 31 Jul 2020 16:26:33 +0200
Subject: [PATCH] lib: doubledatespanp: fix and re-enable doctest

---
 hledger-lib/Hledger/Data/Dates.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger-lib/Hledger/Data/Dates.hs b/hledger-lib/Hledger/Data/Dates.hs
index 119d4b6eb..05d413670 100644
--- a/hledger-lib/Hledger/Data/Dates.hs
+++ b/hledger-lib/Hledger/Data/Dates.hs
@@ -979,8 +979,8 @@ periodexprdatespanp rdate = choice $ map try [
                            ]
 
 -- |
--- -- >>> parsewith (doubledatespan (parsedate "2018/01/01") <* eof) "20180101-201804"
--- Right DateSpan 2018-01-01..2018-04-01
+-- >>> parsewith (doubledatespanp (parsedate "2018/01/01") <* eof) "20180101-201804"
+-- Right DateSpan 2018Q1
 doubledatespanp :: Day -> TextParser m DateSpan
 doubledatespanp rdate = liftA2 fromToSpan
     (optional (string' "from" *> skipNonNewlineSpaces) *> smartdate)