diagrams-hsqml 0.0.0.1 → 0.0.0.2

raw patch · 5 files changed

+6/−8 lines, 5 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• diagrams-hsqml.cabal +1/−1
• src/Diagrams/Backend/HsQML/DiagramObj/Commands.hs +3/−3
• src/Diagrams/Backend/HsQML/DiagramObj/Type.hs +1/−1
• src/Diagrams/Backend/HsQML/Render.hs +1/−1
• src/Diagrams/Backend/HsQML/Tutorial.hs +0/−2

@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                diagrams-hsqml-version:             0.0.0.1+version:             0.0.0.2 synopsis:            HsQML (Qt5) backend for Diagrams description:            `diagrams-hsqml` is a `diagrams` backend painting on a QtQuick Canvas.

@@ -107,12 +107,12 @@ getRGBA :: SomeColor -> (Double, Double, Double, Double) -- ^Convert a colour to a tuple of (r,g,b,a) components. getRGBA c = (r,g,b,a)-  where RGB r g b = fromIntegral <$> toSRGB24 (ac `over` black)+  where RGB r g b = toSRGB (ac `over` black)         a = alphaChannel ac-        ac = toAlphaColour c+        ac = someToAlpha c  getLinearGradient :: LGradient -> DiagramObj (ObjRef GradientObj)--- ^Created a linear gradient.+-- ^Create a linear gradient. getLinearGradient lg = DiagramObj $ \this -> do     g <- newGradient     fireSignal S.connectLinearGradient this g x0 y0 x1 y1

@@ -31,7 +31,7 @@ import Graphics.QML.Objects.ParamNames  {-|-The type to the parts of the diagram are rendered. +The type to which the parts of a diagram are rendered.  The end result of rendering is always a DiagramObj (). The monoid instance sequences actions on the same argument, with noop as identity. As DiagramObj is a wrapper over a function to IO, 'Functor', 'Applicative', 'Monad', and 'MonadIO' instances are defined in an expected way.

@@ -48,7 +48,7 @@   :: Functor f => (SizeSpec2D -> f SizeSpec2D) -> Options HsQML R2 -> f (Options HsQML R2)  -- ^A lens from HsQML backend options to a 'SizeSpec2D'. -- --- sizeSpec :: 'Lens'' ('Options' 'HsQML' 'R2') 'SizeSpec2D'+-- @ sizeSpec :: 'Lens'' ('Options' 'HsQML' 'R2') 'SizeSpec2D' @ sizeSpec = lens (\(HsQMLOptions s) -> s) (\_ s -> HsQMLOptions s)  addAnnotation :: String -> DiagramObj ()

@@ -171,10 +171,8 @@ >  diag <- renderHsQML (mkSizeSpec (Just 800) (Just 800)) diagram >  mainObj <- MainObj <$> newMVar diag >  ctx <- newObjectDC mainObj->  i <- forkIO . requireEventLoop . liftIO $ fireSignal repaint ctx >  runEngineLoop defaultEngineConfig >     { initialDocument = fileDocument "qml/main.qml" >     , contextObject = Just $ anyObjRef ctx >     }->  killThread i -}