diff --git a/src/Text/XML/YJSVG.hs b/src/Text/XML/YJSVG.hs
--- a/src/Text/XML/YJSVG.hs
+++ b/src/Text/XML/YJSVG.hs
@@ -14,7 +14,7 @@
 import Data.Word(Word8)
 
 yjsvgVersion :: (Int, String)
-yjsvgVersion = (1, "0.1.6")
+yjsvgVersion = (2, "0.1.7")
 
 data SVG   = Line Double Double Double Double Color Double |
              Polyline [ ( Double, Double ) ] Color Color Double |
@@ -23,6 +23,7 @@
              Text Double Double Double Color String |
 	     Image Double Double Double Double FilePath |
 	     Group [ Transform ] [ SVG ]
+	deriving Show
 data Color
 	= ColorName{
 		colorName :: String
@@ -32,6 +33,7 @@
 		colorGreen ::  Word8,
 		colorBlue ::  Word8
 	 }
+	deriving Show
 
 mkColorStr :: Color -> String
 mkColorStr ColorName{colorName = n} = n
@@ -44,6 +46,7 @@
 		 Rotate Double (Maybe (Double, Double)) |
 		 SkewX Double |
 		 SkewY Double
+	deriving Show
 
 showTrans :: Transform -> String
 showTrans (Translate tx ty) = "translate(" ++ show tx ++ "," ++ show ty ++ ")"
diff --git a/yjsvg.cabal b/yjsvg.cabal
--- a/yjsvg.cabal
+++ b/yjsvg.cabal
@@ -2,7 +2,7 @@
 Cabal-Version:	>= 1.6
 
 Name:		yjsvg
-Version:	0.1.6
+Version:	0.1.7
 stability:	experimental
 author:		YoshikuniJujo <PAF01143@nifty.ne.jp>
 maintainer:	YoshikuniJujo <PAF01143@nifty.ne.jp>