diff --git a/rss-conduit.cabal b/rss-conduit.cabal
--- a/rss-conduit.cabal
+++ b/rss-conduit.cabal
@@ -1,15 +1,15 @@
 name: rss-conduit
-version: 0.4.2.2
+version: 0.4.3.0
 cabal-version: >=1.10
 build-type: Simple
 license: PublicDomain
 license-file: LICENSE
-maintainer: koral att mailoo dott org
+maintainer: chahine.moreau@gmail.com
 synopsis: Streaming parser/renderer for the RSS standard.
 description:
     Cf README file.
 category: XML, Conduit
-author: koral
+author: chahine.moreau@gmail.com
 extra-source-files:
     README.md
 
@@ -53,7 +53,7 @@
         time >=1.5,
         timerep >=2.0,
         uri-bytestring >=0.2,
-        vinyl -any,
+        vinyl >= 0.9,
         xml-conduit >=1.5,
         xml-types -any
     default-language: Haskell2010
diff --git a/src/Text/RSS/Extensions.hs b/src/Text/RSS/Extensions.hs
--- a/src/Text/RSS/Extensions.hs
+++ b/src/Text/RSS/Extensions.hs
@@ -23,7 +23,6 @@
 import           Data.Vinyl.Core
 import           Data.Vinyl.TypeLevel
 import           Data.XML.Types
-import           Debug.Trace
 import           GHC.Generics
 import           Text.Atom.Conduit.Parse
 import           Text.Atom.Types
diff --git a/src/Text/RSS/Lens.hs b/src/Text/RSS/Lens.hs
--- a/src/Text/RSS/Lens.hs
+++ b/src/Text/RSS/Lens.hs
@@ -5,7 +5,6 @@
 -- {{{ Imports
 import           Text.RSS.Types
 
-import           Data.Singletons.Prelude
 import           Data.Vinyl.Lens
 import           Data.Vinyl.TypeLevel
 import           Lens.Simple
@@ -32,8 +31,8 @@
 itemEnclosureL inj a@RssItem { itemEnclosure = e } = (\x -> a { itemEnclosure = e }) <$> traverse inj e
 {-# INLINE itemEnclosureL #-}
 
-itemExtensionL :: SingI a => RElem a e (RIndex a e) => Lens' (RssItem e) (RssItemExtension a)
-itemExtensionL = itemExtensionsL . f . rlens sing where
+itemExtensionL :: RElem a e (RIndex a e) => Lens' (RssItem e) (RssItemExtension a)
+itemExtensionL = itemExtensionsL . f . rlens where
   f inj (RssItemExtensions a) = RssItemExtensions <$> inj a
 {-# INLINE itemExtensionL #-}
 
@@ -55,7 +54,7 @@
 channelCategoriesL inj a@RssDocument { channelCategories = c } = (\x -> a { channelCategories = c }) <$> traverse inj c
 {-# INLINE channelCategoriesL #-}
 
-channelExtensionL :: SingI a => RElem a e (RIndex a e) => Lens' (RssDocument e) (RssChannelExtension a)
-channelExtensionL = channelExtensionsL . f . rlens sing where
+channelExtensionL :: RElem a e (RIndex a e) => Lens' (RssDocument e) (RssChannelExtension a)
+channelExtensionL = channelExtensionsL . f . rlens where
   f inj (RssChannelExtensions a) = RssChannelExtensions <$> inj a
 {-# INLINE channelExtensionL #-}