hvega-theme 0.2.0.0 → 0.2.0.1
raw patch · 2 files changed
+15/−13 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- hvega-theme.cabal +1/−1
- src/Graphics/Vega/VegaLite/Theme.hs +14/−12
hvega-theme.cabal view
@@ -1,5 +1,5 @@ name: hvega-theme-version: 0.2.0.0+version: 0.2.0.1 synopsis: Theme for hvega. description: A professional theme for publication quality figures. homepage: http://github.com/GregorySchwartz/hvega-theme#readme
src/Graphics/Vega/VegaLite/Theme.hs view
@@ -24,6 +24,7 @@ , configAxisColor :: T.Text , configHeight :: Maybe Double , configWidth :: Maybe Double+ , configLabelAngle :: Maybe Double } defaultConfig :: Config@@ -33,6 +34,7 @@ , configAxisColor = "#000000" , configHeight = Nothing , configWidth = Nothing+ , configLabelAngle = Nothing } theme :: Config -> [ConfigureSpec] -> (VLProperty, VLSpec)@@ -46,21 +48,21 @@ viewConfig :: Config -> [ViewConfig] viewConfig c = catMaybes- [ fmap ViewContinuousHeight (configHeight c) -- 80 for publishing- , fmap ViewContinuousWidth (configWidth c) -- 100 for publishing+ [ fmap ViewContinuousHeight $ configHeight c -- 80 for publishing+ , fmap ViewContinuousWidth $ configWidth c -- 100 for publishing , Just $ ViewStrokeOpacity 0 -- Despine ] legendConfig :: Config -> [LegendConfig] legendConfig c = catMaybes- [ fmap LeLabelFontSize (configFontSize c)- , fmap LeTitleFontSize (configFontSize c)+ [ fmap LeLabelFontSize $ configFontSize c+ , fmap LeTitleFontSize $ configFontSize c ] titleConfig :: Config -> [TitleConfig] titleConfig c = catMaybes- [ fmap TFontSize (configFontSize c)- , Just $ TFont (configFont c)+ [ fmap TFontSize $ configFontSize c+ , Just $ TFont $ configFont c , Just $ TColor "#000000" , Just $ TFontWeight Normal ]@@ -69,11 +71,11 @@ axisConfig c = catMaybes [ Just $ Grid False , Just $ DomainColor "#000000"- , Just $ LabelFont (configLabelFont c)- , fmap LabelFontSize (configFontSize c)- , Just $ LabelAngle 0- , Just $ TickColor (configAxisColor c)- , Just $ TitleFont (configFont c)- , fmap TitleFontSize (configFontSize c)+ , Just $ LabelFont $ configLabelFont c+ , fmap LabelFontSize $ configFontSize c+ , fmap LabelAngle $ configLabelAngle c+ , Just $ TickColor $ configAxisColor c+ , Just $ TitleFont $ configFont c+ , fmap TitleFontSize $ configFontSize c , Just $ TitleFontWeight Normal ]