From 6d326855d92edd6df92acf59718c0ee29e59f04b Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Wed, 13 Oct 2010 15:17:25 +0200 Subject: [PATCH] Removed Widget alias, defined by scaffolder now --- Yesod/Widget.hs | 3 --- scaffold/sitearg_hs.cg | 4 ++++ yesod.cabal | 2 +- 3 files changed, 5 insertions(+), 4 deletions(-) diff --git a/Yesod/Widget.hs b/Yesod/Widget.hs index efbeacfa..6d72f44c 100644 --- a/Yesod/Widget.hs +++ b/Yesod/Widget.hs @@ -8,7 +8,6 @@ module Yesod.Widget ( -- * Datatype GWidget (..) - , Widget , liftHandler -- * Creating , newIdent @@ -59,8 +58,6 @@ newtype GWidget sub master a = GWidget ( instance Monoid (GWidget sub master ()) where mempty = return () mappend x y = x >> y --- | A 'GWidget' specialized to when the subsite and master site are the same. -type Widget y = GWidget y y instance HamletValue (GWidget s m ()) where newtype HamletMonad (GWidget s m ()) a = diff --git a/scaffold/sitearg_hs.cg b/scaffold/sitearg_hs.cg index 3dbecd70..47cb0dc8 100644 --- a/scaffold/sitearg_hs.cg +++ b/scaffold/sitearg_hs.cg @@ -40,6 +40,10 @@ data ~sitearg~ = ~sitearg~ -- will need to be of this type. type Handler = GHandler ~sitearg~ ~sitearg~ +-- | A useful synonym; most of the widgets functions in your application +-- will need to be of this type. +type Widget = GWidget ~sitearg~ ~sitearg~ + -- This is where we define all of the routes in our application. For a full -- explanation of the syntax, please see: -- http://docs.yesodweb.com/book/web-routes-quasi/ diff --git a/yesod.cabal b/yesod.cabal index 395c561f..3adaabb7 100644 --- a/yesod.cabal +++ b/yesod.cabal @@ -1,5 +1,5 @@ name: yesod -version: 0.5.4.2 +version: 0.6.0 license: BSD3 license-file: LICENSE author: Michael Snoyman