diff --git a/digestive-functors-blaze.cabal b/digestive-functors-blaze.cabal
--- a/digestive-functors-blaze.cabal
+++ b/digestive-functors-blaze.cabal
@@ -1,5 +1,5 @@
 Name:          digestive-functors-blaze
-Version:       0.3.0.0
+Version:       0.3.0.1
 Synopsis:      Blaze frontend for the digestive-functors library
 Description:   Blaze frontend for the digestive-functors library
 Homepage:      http://github.com/jaspervdj/digestive-functors
@@ -17,7 +17,7 @@
   Exposed-modules: Text.Digestive.Blaze.Html5
 
   Build-depends:
-    base               >= 4    && < 5,
-    digestive-functors >= 0.3  && < 0.4,
-    blaze-html         >= 0.4  && < 0.6,
-    text               >= 0.11 && < 0.12
+    base               >= 4       && < 5,
+    digestive-functors >= 0.3.0.1 && < 0.4,
+    blaze-html         >= 0.4     && < 0.6,
+    text               >= 0.11    && < 0.12
diff --git a/src/Text/Digestive/Blaze/Html5.hs b/src/Text/Digestive/Blaze/Html5.hs
--- a/src/Text/Digestive/Blaze/Html5.hs
+++ b/src/Text/Digestive/Blaze/Html5.hs
@@ -24,23 +24,12 @@
 import qualified Text.Blaze.Html5 as H
 import qualified Text.Blaze.Html5.Attributes as A
 
-import Text.Digestive.Types
 import Text.Digestive.View
 
 (!?) :: H.Attributable h => h -> (Bool, H.Attribute) -> h
 (!?) h (False, _) = h
 (!?) h (True,  a) = h ! a
 
-absoluteRef :: Text -> View v -> Text
-absoluteRef ref view = fromPath $ absolutePath ref view
-
-label :: Text -> View v -> Html -> Html
-label ref view value = H.label
-    ! A.for (H.toValue ref')
-    $ value
-  where
-    ref' = absoluteRef ref view
-
 inputText :: Text -> View v -> Html
 inputText ref view = H.input
     ! A.type_ "text"
@@ -136,6 +125,13 @@
 inputSubmit value = H.input
     ! A.type_ "submit"
     ! A.value (H.toValue value)
+
+label :: Text -> View v -> Html -> Html
+label ref view value = H.label
+    ! A.for (H.toValue ref')
+    $ value
+  where
+    ref' = absoluteRef ref view
 
 form :: View Html -> Text -> Html -> Html
 form view action = H.form