happstack-hsp 7.0.0 → 7.0.1

raw patch · 2 files changed

+7/−6 lines, 2 files

Files

• happstack-hsp.cabal +1/−1
• src/HSP/Google/Analytics.hs +6/−5

@@ -1,5 +1,5 @@ Name:                happstack-hsp-Version:             7.0.0+Version:             7.0.1 Synopsis:            Support for using HSP templates in Happstack Description:         Happstack is a web application framework. HSP is an XML templating solution. This package makes it easy to use HSP templates with Happstack. Homepage:            http://www.happstack.com/

@@ -1,9 +1,10 @@ {-# LANGUAGE DeriveDataTypeable, PatternGuards, FlexibleContexts, TypeFamilies #-} {-# OPTIONS_GHC -F -pgmFtrhsx #-}-module HSP.Google.Analytics +module HSP.Google.Analytics     ( UACCT(..)     , analytics     , addAnalytics+    , analyticsAsync     ) where  import Data.Generics (Data, Typeable)@@ -17,7 +18,7 @@ -- | create the google analytics asynchronous tracking script tag -- -- NOTE: you must put this right before the \<\/head\> tag-analyticsAsync :: (XMLGenerator m) => +analyticsAsync :: (XMLGenerator m) =>                   UACCT     -- ^ web property ID (looks like: @UA-XXXXX-X@)                -> GenXML m analyticsAsync (UACCT uacct) =@@ -61,9 +62,9 @@                 , EmbedAsChild m XML                 , EmbedAsAttr m Attribute                 , XMLGenerator m-                , HSX.XML m ~ XML) -             => UACCT -             -> XMLGenT m XML +                , HSX.XML m ~ XML)+             => UACCT+             -> XMLGenT m XML              -> GenXML m addAnalytics uacct pg =     do page <- pg