forge/Vervis
1
0
Fork 0
Code Pull requests Activity

Rename breadcrumbBar to breadcrumbsW according to new convention

Browse source
This commit is contained in:
fr33domlover 2016-05-06 10:24:58 +00:00
parent ae03aee099
commit 7e8e557625
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Vervis/Foundation.hs
View file

@ -32,7 +32,7 @@ import Data.Text as T (pack)
import Text.Jasmine.Local (discardm) import Text.Jasmine.Local (discardm)
import Vervis.Import.NoFoundation hiding (last) 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 -- | The foundation datatype for your application. This can be a good place to
-- keep settings and values requiring initialization before your application -- keep settings and values requiring initialization before your application

6
src/Vervis/Widget.hs
View file

@ -15,7 +15,7 @@
-- | Various custom widgets. -- | Various custom widgets.
module Vervis.Widget module Vervis.Widget
( breadcrumbBar ( breadcrumbsW
) )
where where
@ -27,7 +27,7 @@ import Yesod.Core.Widget
import Vervis.Settings (widgetFile) import Vervis.Settings (widgetFile)
import Vervis.Style import Vervis.Style
breadcrumbBar :: YesodBreadcrumbs site => WidgetT site IO () breadcrumbsW :: YesodBreadcrumbs site => WidgetT site IO ()
breadcrumbBar = do breadcrumbsW = do
(current, bcs) <- handlerToWidget breadcrumbs (current, bcs) <- handlerToWidget breadcrumbs
$(widgetFile "breadcrumbs") $(widgetFile "breadcrumbs")