rewrite-inspector 0.1.0.3 → 0.1.0.4

raw patch · 3 files changed

+19/−4 lines, 3 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

Files

• rewrite-inspector.cabal +3/−2
• src/Pretty.hs +2/−2
• src/RewriteInspector.hs +14/−0

@@ -1,5 +1,5 @@ name: rewrite-inspector-version: 0.1.0.3+version: 0.1.0.4 cabal-version: >=1.10 build-type: Simple license: BSD3@@ -25,7 +25,8 @@  library     hs-source-dirs:   src-    exposed-modules:  Gen+    exposed-modules:  RewriteInspector+                      Gen                       Types                       Pretty                       BrickUI

@@ -96,7 +96,7 @@ -- UI Styling.  defaultTheme :: [(String, V.Attr)] -> Bt.Theme-defaultTheme userTheme = Bt.newTheme V.defAttr $+defaultTheme extraAttrs = Bt.newTheme V.defAttr $   [ ("focus",      B.bg $ V.rgbColor 47 79 79)   , ("title",      V.defAttr `V.withStyle` V.bold)   , ("emph",       V.defAttr `V.withStyle` V.bold)@@ -112,7 +112,7 @@   , ("literal",   V.defAttr `V.withForeColor` V.brightCyan)   , ("unique",    V.defAttr `V.withStyle` V.dim)   , ("qualifier", V.defAttr `V.withStyle` V.italic)-  ] ++ map (\(s, a) -> (B.attrName s, a)) userTheme+  ] ++ map (\(s, a) -> (B.attrName s, a)) extraAttrs  modify :: Bool -> [String] -> Widget n -> Widget n modify scroll = foldr (.) id . fmap mod1 . sortOn (\case "Type" -> 1; _ -> 0)

@@ -0,0 +1,14 @@+{-|+  Copyright   :  (C) 2019, QBayLogic+  License     :  BSD2 (see the file LICENSE)+  Maintainer  :  Orestis Melkonian <melkon.or@gmail.com>++  Entry-point.+-}+module RewriteInspector+  ( module Gen+  , runTerminal+  ) where++import Gen+import BrickUI (runTerminal)