clay 0.12 → 0.12.1
raw patch · 7 files changed
+44/−21 lines, 7 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Clay.Background: class Val a
+ Clay.Background: location :: Loc a => a -> Location
+ Clay.Common: allValue :: Value
+ Clay.Common: autoValue :: Value
+ Clay.Common: baselineValue :: Value
+ Clay.Common: centerValue :: Value
+ Clay.Common: hiddenValue :: Value
+ Clay.Common: inheritValue :: Value
+ Clay.Common: initialValue :: Value
+ Clay.Common: noneValue :: Value
+ Clay.Common: normalValue :: Value
+ Clay.Common: unsetValue :: Value
+ Clay.Common: visibleValue :: Value
+ Clay.Display: vAlignBaseline :: VerticalAlignValue
Files
- clay.cabal +1/−1
- src/Clay/Background.hs +2/−0
- src/Clay/Common.hs +34/−11
- src/Clay/Display.hs +1/−1
- src/Clay/Selector.hs +0/−1
- src/Clay/Size.hs +6/−6
- src/Clay/Stylesheet.hs +0/−1
clay.cabal view
@@ -1,5 +1,5 @@ Name: clay-Version: 0.12+Version: 0.12.1 Synopsis: CSS preprocessor as embedded Haskell. Description: Clay is a CSS preprocessor like LESS and Sass, but implemented as an embedded
src/Clay/Background.hs view
@@ -84,6 +84,8 @@ , Location , Loc+, Val+, location ) where
src/Clay/Common.hs view
@@ -33,18 +33,41 @@ class Other a where other :: Value -> a -instance All Value where all = "all"-instance Auto Value where auto = "auto"-instance Baseline Value where baseline = "baseline"-instance Center Value where center = "center"-instance Inherit Value where inherit = "inherit"-instance Normal Value where normal = "normal"-instance None Value where none = "none"-instance Visible Value where visible = "visible"-instance Hidden Value where hidden = "hidden"+allValue :: Value+allValue = "all"+autoValue :: Value+autoValue = "auto"+baselineValue :: Value+baselineValue = "baseline"+centerValue :: Value+centerValue = "center"+inheritValue :: Value+inheritValue = "inherit"+normalValue :: Value+normalValue = "normal"+noneValue :: Value+noneValue = "none"+visibleValue :: Value+visibleValue = "visible"+hiddenValue :: Value+hiddenValue = "hidden"+initialValue :: Value+initialValue = "initial"+unsetValue :: Value+unsetValue = "unset"++instance All Value where all = allValue+instance Auto Value where auto = autoValue+instance Baseline Value where baseline = baselineValue+instance Center Value where center = centerValue+instance Inherit Value where inherit = inheritValue+instance Normal Value where normal = normalValue+instance None Value where none = noneValue+instance Visible Value where visible = visibleValue+instance Hidden Value where hidden = hiddenValue instance Other Value where other = id-instance Initial Value where initial = "initial"-instance Unset Value where unset = "unset"+instance Initial Value where initial = initialValue+instance Unset Value where unset = unsetValue -------------------------------------------------------------------------------
src/Clay/Display.hs view
@@ -65,7 +65,7 @@ -- * Vertical align. , VerticalAlign(..)-, middle, vAlignSub, vAlignSuper, textTop, textBottom, vAlignTop, vAlignBottom+, middle, vAlignSub, vAlignSuper, textTop, textBottom, vAlignTop, vAlignBottom, vAlignBaseline -- * Cursor
src/Clay/Selector.hs view
@@ -1,7 +1,6 @@ {-# LANGUAGE OverloadedStrings , FlexibleInstances- , FlexibleContexts , GeneralizedNewtypeDeriving , StandaloneDeriving , UndecidableInstances
src/Clay/Size.hs view
@@ -1,11 +1,11 @@ {-# LANGUAGE- EmptyDataDecls- , OverloadedStrings+ OverloadedStrings , GeneralizedNewtypeDeriving , FlexibleInstances , ExistentialQuantification , StandaloneDeriving , TypeFamilies+ , EmptyDataDecls #-} module Clay.Size (@@ -108,10 +108,10 @@ value (OtherSize a) = a value s = Value $ browsers <> Plain ("calc" <> sizeToText s) -instance Auto (Size a) where auto = Clay.Common.auto-instance Normal (Size a) where normal = Clay.Common.normal-instance Inherit (Size a) where inherit = Clay.Common.inherit-instance None (Size a) where none = Clay.Common.none+instance Auto (Size a) where auto = OtherSize Clay.Common.autoValue+instance Normal (Size a) where normal = OtherSize Clay.Common.normalValue+instance Inherit (Size a) where inherit = OtherSize Clay.Common.inheritValue+instance None (Size a) where none = OtherSize Clay.Common.noneValue instance Other (Size a) where other a = OtherSize a -- | Zero size.
src/Clay/Stylesheet.hs view
@@ -1,5 +1,4 @@ {-# LANGUAGE GeneralizedNewtypeDeriving #-}-{-# LANGUAGE TypeSynonymInstances #-} {-# LANGUAGE FlexibleInstances #-} module Clay.Stylesheet where