diagrams-postscript 1.0.1 → 1.0.1.1

raw patch · 2 files changed

+8/−4 lines, 2 files

Files

• diagrams-postscript.cabal +1/−1
• src/Diagrams/Backend/Postscript.hs +7/−3

@@ -1,5 +1,5 @@ Name:                diagrams-postscript-Version:             1.0.1+Version:             1.0.1.1 Synopsis:            Postscript backend for diagrams drawing EDSL Description:         This package provides a modular backend for rendering                      diagrams created with the diagrams EDSL using Postscript.

@@ -61,7 +61,7 @@ import           Data.Maybe                    (catMaybes)  import qualified Data.Foldable                 as F-import           Data.Hashable                 (Hashable)+import           Data.Hashable                 (Hashable (..)) import qualified Data.List.NonEmpty            as N import           Data.Monoid.Split import           Data.Typeable@@ -93,7 +93,7 @@           , _psSizeSpec     :: SizeSpec2D   -- ^ the requested size of the output           , _psOutputFormat :: OutputFormat -- ^ the output format and associated options           }-    deriving (Show, Generic)+    deriving (Show)    withStyle _ s t (C r) = C $ do     C.save@@ -118,7 +118,11 @@   adjustDia c opts d = adjustDia2D _psSizeSpec setPsSize c opts d     where setPsSize sz o = o { _psSizeSpec = sz } -instance Hashable (Options Postscript R2)+instance Hashable (Options Postscript R2) where+  hashWithSalt s (PostscriptOptions fn sz out) =+    s `hashWithSalt` fn+      `hashWithSalt` sz+      `hashWithSalt` out  sizeFromSpec :: SizeSpec2D -> (Double, Double) sizeFromSpec size = case size of