From d3cc31780a26c469649ad71ea81f2df31f5ca36f Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 25 Aug 2023 00:05:31 +0100
Subject: [PATCH] dev: AmountStyle: improve debug output

---
 hledger-lib/Hledger/Data/Types.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/hledger-lib/Hledger/Data/Types.hs b/hledger-lib/Hledger/Data/Types.hs
index e5a51561c..0b5ff6d5f 100644
--- a/hledger-lib/Hledger/Data/Types.hs
+++ b/hledger-lib/Hledger/Data/Types.hs
@@ -259,14 +259,13 @@ data AmountStyle = AmountStyle {
 } deriving (Eq,Ord,Read,Generic)
 
 instance Show AmountStyle where
-  show AmountStyle{..} = concat
-    [ "AmountStylePP \""
+  show AmountStyle{..} = unwords
+    [ "AmountStylePP"
     , show ascommodityside
     , show ascommodityspaced
     , show asprecision
     , show asdecimalpoint
     , show asdigitgroups
-    , "..\""
     ]
 
 -- | The "display precision" for a hledger amount, by which we mean