ghc-vis 0.9.1 → 0.9.2
raw patch · 2 files changed
+8/−7 lines, 2 filesdep ~base
Dependency ranges changed: base
Files
- ghc-vis.cabal +8/−4
- src/GHC/Vis.hs +0/−3
ghc-vis.cabal view
@@ -1,9 +1,9 @@+cabal-version: 2.2 name: ghc-vis-version: 0.9.1-license: BSD3+version: 0.9.2+license: BSD-3-Clause license-file: LICENSE category: GHC, Debug, Development-cabal-version: >= 1.10 build-type: Custom author: Dennis Felsing, Joachim Breitner, Contributors maintainer: Dennis Felsing <dennis@felsin9.de>@@ -36,11 +36,15 @@ -- Default: False -- Description: "SDL window" +custom-setup+ setup-depends: base >= 4, Cabal >= 1.24, filepath+ Library Exposed-modules: GHC.Vis+ Autogen-Modules: Paths_ghc_vis Other-modules: GHC.Vis.Internal GHC.Vis.Types GHC.Vis.View.List GHC.Vis.View.Common Paths_ghc_vis Default-Language: Haskell2010- Build-depends: base >= 4.5 && < 4.15,+ Build-depends: base >= 4.5 && < 5, mtl >= 2.0, fgl >= 5.4, deepseq >= 1.3,
src/GHC/Vis.hs view
@@ -90,7 +90,6 @@ #endif import Graphics.Rendering.Cairo hiding (restore, x, y, width, height)-import Debug.Trace #ifdef FULL_WINDOW import Graphics.Rendering.Cairo.SVG@@ -310,7 +309,6 @@ setupGUI window canvas legendCanvas = do widgetAddEvents canvas [PointerMotionMask] on canvas motionNotifyEvent $ do- liftIO $ traceIO "on canvas motionNotifyEvent" (x,y) <- eventCoordinates lift $ do state <- readIORef visState@@ -325,7 +323,6 @@ widgetQueueDraw canvas else runCorrect move >>= \f -> f canvas- traceIO "on canvas motionNotifyEvent End" return True on canvas buttonPressEvent $ do