packages feed

diagrams-postscript 0.6 → 0.6.0.1

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

diagrams-postscript.cabal view
@@ -1,5 +1,5 @@ Name:                diagrams-postscript-Version:             0.6+Version:             0.6.0.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.
src/Graphics/Rendering/Postscript.hs view
@@ -68,7 +68,7 @@   , setFontSize   ) where -import Diagrams.Attributes(Color(..),LineCap(..),LineJoin(..),colorToSRGBA)+import Diagrams.Attributes(Color(..),LineCap(..),LineJoin(..),colorToRGBA) import Diagrams.TwoD.Path hiding (stroke) import Control.Monad.Writer import Control.Monad.State@@ -304,7 +304,7 @@  colorPS :: Color c => c -> [Double] colorPS c = [ r, g, b ]-  where (r,g,b,_) = colorToSRGBA c+  where (r,g,b,_) = colorToRGBA c  -- | Set the color of the stroke. strokeColor :: (Color c) => c -> Render ()