ghc-vis 0.7.2.5 → 0.7.2.6

raw patch · 2 files changed

+5/−1 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ghc-vis.cabal +1/−1
• src/GHC/Vis/View/Graph.hs +4/−0

@@ -1,5 +1,5 @@ name:               ghc-vis-version:            0.7.2.5+version:            0.7.2.6 license:            BSD3 license-file:       LICENSE category:           GHC, Debug, Development

@@ -180,6 +180,10 @@     Just (Node t, EvaluateIcon) -> evaluateClick s t     Just (Node t, CollapseIcon) -> collapseClick s t     _ -> return ()+  when hm $ case iconHover s of+    -- Don't evaluate when we're back in time, but allow collapsing+    Just (Node t, CollapseIcon) -> collapseClick s t+    _ -> return ()  evaluateClick :: State -> Int -> IO () evaluateClick s t = unless (length (boxes s) <= t) $ do