plot 0.2.3.9 → 0.2.3.10

raw patch · 4 files changed

+14/−7 lines, 4 files

Files

• CHANGES +5/−0
• lib/Graphics/Rendering/Plot/Figure/Plot/Axis.hs +3/−3
• lib/Graphics/Rendering/Plot/Render/Plot/Axis.hs +3/−1
• plot.cabal +3/−3

@@ -137,3 +137,8 @@  0.2.3.8: 		* resolve ambiguity in Upper and Lower types from HMatrix++0.2.3.9:++0.2.3.10:+		* adapt to new MonadFail by vaibhavsagar

@@ -29,7 +29,7 @@  ----------------------------------------------------------------------------- ---import Data.Maybe+import Data.Maybe (fromMaybe)  import Control.Monad.State import Control.Monad.Reader@@ -75,10 +75,10 @@       Minor -> do         -- at this point can we guarantee there won't         -- be a Nothing?-        (Just (Ticks lt'' v')) <- gets _minor_ticks+        (Ticks lt'' v') <- fromMaybe (error "Minor ticks was Nothing") <$> gets _minor_ticks         return (lt'',v')       Major -> do-        (Just (Ticks lt'' v')) <- gets _major_ticks+        (Ticks lt'' v') <- fromMaybe (error "Major ticks was Nothing") <$> gets _major_ticks         return (lt'',v')   let lt = execLine m lo lt'   case t of

@@ -121,7 +121,9 @@ shiftForAxisLabel :: Padding -> AxisData -> Render Padding shiftForAxisLabel p (Axis _  _   _ _ _ _ _ NoText) = return p shiftForAxisLabel p (Axis ax sd  _ _ _ _ _ lb) = do-  (FontText to s) <- formatText lb+  (to, s) <- flip fmap (formatText lb) $ \ft -> case ft of+    (FontText to s) -> (to, s)+    _ -> error "not FontText"   pc <- asks _pangocontext   (w,h) <- cairo $ do     lo <- pango $ P.layoutText pc s

@@ -1,8 +1,8 @@ Name:                plot-Version:             0.2.3.9+Version:             0.2.3.10 License:             BSD3 License-file:        LICENSE-Copyright:           (c) A.V.H. McPhail 2010, 2012-2017+Copyright:           (c) A.V.H. McPhail 2010, 2012-2017, 2019 Author:              Vivian McPhail Maintainer:          haskell.vivian.mcphail <at> gmail <dot> com Stability:           experimental@@ -44,7 +44,7 @@                      examples/perturbed-sine.png,                      examples/Test.hs,                      examples/Test2.hs,-		     examples/Test3.hs+                     examples/Test3.hs  library