diff --git a/ghc-src/Miso/Html/Internal.hs b/ghc-src/Miso/Html/Internal.hs
--- a/ghc-src/Miso/Html/Internal.hs
+++ b/ghc-src/Miso/Html/Internal.hs
@@ -126,7 +126,7 @@
 instance HasLink (View a) where
 #if MIN_VERSION_servant(0,14,0)
   type MkLink (View a) b = MkLink (Get '[] ()) b
-  toLink Proxy toA = toLink toA (Proxy :: Proxy (Get '[] ()))
+  toLink toA Proxy = toLink toA (Proxy :: Proxy (Get '[] ()))
 #else
   type MkLink (View a) = MkLink (Get '[] ())
   toLink Proxy = toLink (Proxy :: Proxy (Get '[] ()))
diff --git a/miso.cabal b/miso.cabal
--- a/miso.cabal
+++ b/miso.cabal
@@ -1,5 +1,5 @@
 name:                miso
-version:             0.21.0.0
+version:             0.21.1.0
 category:            Web, Miso, Data Structures
 license:             BSD3
 license-file:        LICENSE