Clean up show instance for Translation

Mikolaj · Apr 2, 2011 · 665255e · 665255e
1 parent 7bb8426
commit 665255e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Graphics/Vty/Image.hs b/src/Graphics/Vty/Image.hs
@@ -111,7 +111,7 @@ instance Show Image where
     show ( VertJoin { part_top = t, part_bottom = b, output_width = c, output_height = r } ) 
         = "VertJoin (" ++ show c ++ ", " ++ show r ++ ") ( " ++ show t ++ " ) <-> ( " ++ show b ++ " )"
     show ( Translation offset i )
-        = "Translation ( " ++ show offset ++ ", " ++ show i ++ " )"
+        = "Translation " ++ show offset ++ " ( " ++ show i ++ " )"
     show ( EmptyImage ) = "EmptyImage"
 
 -- | Currently append in the Monoid instance is equivalent to <->. Future versions will just stack