there shouldn't be brackets in transaction's effective date, my mistake

Ledger/LedgerTransaction.hs

@@ -70,7 +70,7 @@ showLedgerTransaction' elide effective t =
       code = if (length $ ltcode t) > 0 then (printf " (%s)" $ ltcode t) else ""
       desc = " " ++ ltdescription t
       showdate = printf "%-10s" . showDate
-      showedate = printf "[=%s]" . showdate
+      showedate = printf "=%s" . showdate
       showpostings ps
           | elide && length ps > 1 && isLedgerTransactionBalanced t
               = map showposting (init ps) ++ [showpostingnoamt (last ps)]

Ledger/Parse.hs

@@ -356,9 +356,8 @@ ledgerdatetime = do
 
 ledgereffectivedate :: GenParser Char LedgerFileCtx (Maybe Day)
 ledgereffectivedate = do
-  string "[="
+  char '='
   edate <- ledgerdate
-  char ']'
   return $ Just edate
 
 ledgerstatus :: GenParser Char st Bool

tests/effective-balance.test

@@ -4,7 +4,7 @@
   a  1
   b
 
-2009/1/1[=2010/1/1] x
+2009/1/1=2010/1/1 x
   a  10
   b
 >>>

tests/effective-day.test

@@ -3,7 +3,7 @@
 <<<
 Y 2009
 
-2009/1/1[=1/2] x
+2009/1/1=1/2 x
   a  1
   b
 >>>

tests/effective-print-2.test

@@ -1,10 +1,10 @@
 -f - print
 <<<
-2009/1/1[=2010/1/1] x
+2009/1/1=2010/1/1 x
   a  1
   b
 >>>
-2009/01/01[=2010/01/01] x
+2009/01/01=2010/01/01 x
     a             1
     b            -1
 

tests/effective-print.test

@@ -1,6 +1,6 @@
 -f - print --effective
 <<<
-2009/1/1[=2010/1/1] x
+2009/1/1=2010/1/1 x
   a  1
   b
 >>>

tests/effective-register.test

@@ -1,6 +1,6 @@
 -f - register --effective
 <<<
-2009/1/1[=2010/1/1] x
+2009/1/1=2010/1/1 x
   a  1
   b
 >>>