From 7e8e557625b17c1202b481a0d7d108a7acb4e458 Mon Sep 17 00:00:00 2001
From: fr33domlover <fr33domlover@rel4tion.org>
Date: Fri, 6 May 2016 10:24:58 +0000
Subject: [PATCH] Rename breadcrumbBar to breadcrumbsW according to new
 convention

---
 src/Vervis/Foundation.hs | 2 +-
 src/Vervis/Widget.hs     | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/Vervis/Foundation.hs b/src/Vervis/Foundation.hs
index b50f148..eb1d9ec 100644
--- a/src/Vervis/Foundation.hs
+++ b/src/Vervis/Foundation.hs
@@ -32,7 +32,7 @@ import Data.Text as T (pack)
 
 import Text.Jasmine.Local (discardm)
 import Vervis.Import.NoFoundation hiding (last)
-import Vervis.Widget (breadcrumbBar)
+import Vervis.Widget (breadcrumbsW)
 
 -- | The foundation datatype for your application. This can be a good place to
 -- keep settings and values requiring initialization before your application
diff --git a/src/Vervis/Widget.hs b/src/Vervis/Widget.hs
index a141581..65caf29 100644
--- a/src/Vervis/Widget.hs
+++ b/src/Vervis/Widget.hs
@@ -15,7 +15,7 @@
 
 -- | Various custom widgets.
 module Vervis.Widget
-    ( breadcrumbBar
+    ( breadcrumbsW
     )
 where
 
@@ -27,7 +27,7 @@ import Yesod.Core.Widget
 import Vervis.Settings (widgetFile)
 import Vervis.Style
 
-breadcrumbBar :: YesodBreadcrumbs site => WidgetT site IO ()
-breadcrumbBar = do
+breadcrumbsW :: YesodBreadcrumbs site => WidgetT site IO ()
+breadcrumbsW = do
     (current, bcs) <- handlerToWidget breadcrumbs
     $(widgetFile "breadcrumbs")