Correct type signature of breadcrumbLink

amitaibu · amitaibu · commit d5c2356aa5c1 · 2022-01-25T22:05:57.000+02:00
diff --git a/IHP/Breadcrumb/ViewFunctions.hs b/IHP/Breadcrumb/ViewFunctions.hs
@@ -30,7 +30,7 @@ renderBreadcrumb breadcrumbItems = styledBreadcrumb theCSSFramework theCSSFramew
                 }
 
 
-breadcrumbLink :: (Show controller, AutoRoute controller) => Html -> controller -> BreadcrumbItem
+breadcrumbLink :: (HasPath controller) =>Html -> controller -> BreadcrumbItem
 breadcrumbLink label route =
     breadcrumbLinkExternal label (pathTo route)
 

Original file line number	Diff line number	Diff line change
`@@ -30,7 +30,7 @@ renderBreadcrumb breadcrumbItems = styledBreadcrumb theCSSFramework theCSSFramew`
`30`	`30`	`}`
`31`	`31`
`32`	`32`
`33`		`-breadcrumbLink :: (Show controller, AutoRoute controller) => Html -> controller -> BreadcrumbItem`
	`33`	`+breadcrumbLink :: (HasPath controller) =>Html -> controller -> BreadcrumbItem`
`34`	`34`	`breadcrumbLink label route =`
`35`	`35`	`breadcrumbLinkExternal label (pathTo route)`
`36`	`36`