diff --git a/extra/hledger-register-csv.hs b/extra/hledger-register-csv.hs
index e6464f0b5..568d9a8fc 100755
--- a/extra/hledger-register-csv.hs
+++ b/extra/hledger-register-csv.hs
@@ -55,5 +55,5 @@ postingsReportItemAsCsvRecord (_, _, _, p, b) = [date,desc,acct,amt,bal]
                              BalancedVirtualPosting -> (\s -> "["++s++"]")
                              VirtualPosting -> (\s -> "("++s++")")
                              _ -> id
-    amt = showMixedAmountWithoutPrice $ pamount p
-    bal = showMixedAmountWithoutPrice b
+    amt = showMixedAmountOneLineWithoutPrice $ pamount p
+    bal = showMixedAmountOneLineWithoutPrice b