Yielding for safe instances of HasLink
This commit is contained in:
parent
372c1e2a32
commit
9e4285f99d
1 changed files with 2 additions and 2 deletions
|
@ -307,8 +307,8 @@ instance HasLink sub => HasLink (BasicAuth realm a :> sub) where
|
|||
|
||||
-- Verb (terminal) instances
|
||||
instance HasLink (Verb m s ct a) where
|
||||
type MkLink (Verb m s ct a) = URI
|
||||
toLink _ = linkURI
|
||||
type MkLink (Verb m s ct a) = Link
|
||||
toLink _ = id
|
||||
|
||||
instance HasLink Raw where
|
||||
type MkLink Raw = URI
|
||||
|
|
Loading…
Reference in a new issue