diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-09-08 22:36:38 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-09-08 22:36:38 -0400 |
| commit | 581a87cad226c1e1c3fbe6a8cbd52c65bd3baef5 (patch) | |
| tree | 096944229e0fc36f29e0ccd067b65b144796a4ee /src | |
| parent | 226897142791a69b70905fd0442708f6ae6d9043 (diff) | |
better Show for Info
Diffstat (limited to 'src')
| -rw-r--r-- | src/Propellor/Types/Info.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Types/Info.hs b/src/Propellor/Types/Info.hs index d5c463c3..a80bb681 100644 --- a/src/Propellor/Types/Info.hs +++ b/src/Propellor/Types/Info.hs @@ -21,7 +21,7 @@ import Data.Maybe data Info = Info [(Dynamic, Bool)] instance Show Info where - show (Info l) = "Info " ++ show (length l) + show (Info l) = "Info " ++ show (map (dynTypeRep . fst) l) instance Monoid Info where mempty = Info [] |