diff --git a/hledger/Hledger/Cli/Commands/Close.hs b/hledger/Hledger/Cli/Commands/Close.hs
index d785e2ba1..6eec9025f 100755
--- a/hledger/Hledger/Cli/Commands/Close.hs
+++ b/hledger/Hledger/Cli/Commands/Close.hs
@@ -43,10 +43,10 @@ close CliOpts{rawopts_=rawopts, reportopts_=ropts} j = do
       -- amounts in opening/closing transactions should be too (#941)
       -- setprec = setFullPrecision
       setprec = setMinimalPrecision
-
+      -- balance assertion amounts will be unpriced, cf #824
       closingps = [posting{paccount=a
                           ,pamount=mixed [setprec $ negate b]
-                          ,pbalanceassertion=Just assertion{baamount=setprec b{aquantity=0}}
+                          ,pbalanceassertion=Just assertion{baamount=setprec b{aquantity=0, aprice=NoPrice}}
                           }
                   | (a,_,_,mb) <- acctbals
                   , b <- amounts $ normaliseMixedAmountSquashPricesForDisplay mb
@@ -55,7 +55,7 @@ close CliOpts{rawopts_=rawopts, reportopts_=ropts} j = do
 
       openingps = [posting{paccount=a
                           ,pamount=mixed [setprec b]
-                          ,pbalanceassertion=Just assertion{baamount=setprec b}
+                          ,pbalanceassertion=Just assertion{baamount=setprec b{aprice=NoPrice}}
                           }
                   | (a,_,_,mb) <- acctbals
                   , b <- amounts $ normaliseMixedAmountSquashPricesForDisplay mb