diff --git a/blaze-svg.cabal b/blaze-svg.cabal
--- a/blaze-svg.cabal
+++ b/blaze-svg.cabal
@@ -1,5 +1,5 @@
 name:                blaze-svg
-version:             0.3.0.1
+version:             0.3.1.0
 synopsis:            SVG combinator library
 homepage:            https://github.com/deepakjois/blaze-svg
 license:             BSD3
@@ -18,10 +18,10 @@
   .
   * Programs in the /examples/ folder of this project: <https://github.com/deepakjois/blaze-svg/tree/master/examples/>
   .
-  * Jasper Van Der Jeugt has written  tutorial below is for /blaze-html/,
-    which is a sister library of /blaze-svg/, but gives a good overview
-    on how to use the  combinators in "Text.Blaze.Svg11" and
-    "Text.Blaze.Svg11.Attributes":
+  * Jasper Van Der Jeugt has written a tutorial for /blaze-html/,
+    which is a sister library of /blaze-svg/. It may not be directly relevant,
+    but still it gives a good overview on how to use the  combinators in
+    "Text.Blaze.Svg11" and "Text.Blaze.Svg11.Attributes":
     <http://jaspervdj.be/blaze/tutorial.html>.
 
 Extra-source-files:
diff --git a/src/Text/Blaze/Svg11.hs b/src/Text/Blaze/Svg11.hs
--- a/src/Text/Blaze/Svg11.hs
+++ b/src/Text/Blaze/Svg11.hs
@@ -208,12 +208,13 @@
 {-# INLINE circle #-}
 
 -- WARNING: The next block of code was automatically generated by
--- src/Util/GenerateSvgCombinators.hs:205
+-- src/Util/GenerateSvgCombinators.hs:186
 --
--- | Combinator for the @\<clipPath />@ element.
+-- | Combinator for the @\<clipPath>@ element.
 --
-clippath :: Svg  -- ^ Resulting SVG.
-clippath = Leaf "clipPath" "<clipPath" " />"
+clippath :: Svg  -- ^ Inner SVG.
+         -> Svg  -- ^ Resulting SVG.
+clippath = Parent "clipPath" "<clipPath" "</clipPath>"
 {-# INLINE clippath #-}
 
 -- WARNING: The next block of code was automatically generated by
diff --git a/src/Util/GenerateSvgCombinators.hs b/src/Util/GenerateSvgCombinators.hs
--- a/src/Util/GenerateSvgCombinators.hs
+++ b/src/Util/GenerateSvgCombinators.hs
@@ -242,12 +242,12 @@
         ]
     , parents =
         [ "a","defs","glyph","g","marker","mask","missing-glyph","pattern", "svg"
-        , "switch", "symbol", "linearGradient", "radialGradient"
+        , "switch", "symbol", "linearGradient", "radialGradient", "clipPath"
         ]
     , leafs =
         [ "altGlyph", "altGlyphDef", "altGlyphItem", "animate", "animateColor"
-        , "animateMotion", "animateTransform", "circle", "clipPath"
-        , "color-profile" , "cursor", "desc", "ellipse", "feBlend"
+        , "animateMotion", "animateTransform", "circle", "color-profile"
+        , "cursor", "desc", "ellipse", "feBlend"
         , "feColorMatrix", "feComponentTransfer" , "feComposite"
         , "feConvolveMatrix", "feDiffuseLighting", "feDisplacementMap"
         , "feDistantLight", "feFlood", "feFuncA", "feFuncB" , "feFuncG"