From a0010a294f6b41084e91f0742ac7448272e11b7a Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Thu, 7 Aug 2014 17:36:10 -0700
Subject: [PATCH] cli: smart dates must use a consistent separator

Along with the preceding commits, this means that date:2014-8/1 is now
parsed as 2014/01/01-2014/08/01 as intended, not 2014/08/01.
---
 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 e3ee45ed8..486c12980 100644
--- a/hledger-lib/Hledger/Data/Dates.hs
+++ b/hledger-lib/Hledger/Data/Dates.hs
@@ -474,10 +474,10 @@ ymd :: GenParser Char st SmartDate
 ymd = do
   y <- many1 digit
   failIfInvalidYear y
-  datesepchar
+  sep <- datesepchar
   m <- many1 digit
   failIfInvalidMonth m
-  datesepchar
+  char sep
   d <- many1 digit
   failIfInvalidDay d
   return $ (y,m,d)