diff --git a/servant/src/Servant/Utils/Links.hs b/servant/src/Servant/Utils/Links.hs
index 880b951c..15f38096 100644
--- a/servant/src/Servant/Utils/Links.hs
+++ b/servant/src/Servant/Utils/Links.hs
@@ -342,8 +342,8 @@ instance (ToText v, HasLink sub)
             addSegment (escape . unpack $ toText v) l
 
 instance HasLink sub => HasLink (Header sym a :> sub) where
-	type MkLink (Header sym a :> sub) = MkLink sub
-	toLink _ = toLink (Proxy :: Proxy sub)
+    type MkLink (Header sym a :> sub) = MkLink sub
+    toLink _ = toLink (Proxy :: Proxy sub)
 
 -- Verb (terminal) instances
 instance HasLink (Get y r) where