Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-vty for openSUSE:Factory checked in at 2026-11-09 16:03:41 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-vty (Old) and /work/SRC/openSUSE:Factory/.ghc-vty.new.3759290 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-vty" Mon Nov 9 16:03:41 2026 rev:21 rq:1396007 version:6.7 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-vty/ghc-vty.changes 2026-06-22 17:44:42.601871963 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-vty.new.3759290/ghc-vty.changes 2026-11-09 16:04:20.281043815 +0100 @@ -1,0 +2,17 @@ +Thu Nov 5 19:06:24 UTC 2026 - Peter Simons <[email protected]> + +- Update vty to version 6.7. + 6.7 + --- + + API changes: + + * `Graphics.Vty.Image`: added `rewriteAttrs` for performing arbitrary + attribute transformations over images + + Other improvements: + + * Improved image performance by re-using known text string widths + (thanks Andrzej Rybczak) + +------------------------------------------------------------------- Old: ---- vty-6.6.tar.gz New: ---- vty-6.7.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-vty.spec ++++++ --- /var/tmp/diff_new_pack.3K6NTg/_old 2026-11-09 16:04:21.197082218 +0100 +++ /var/tmp/diff_new_pack.3K6NTg/_new 2026-11-09 16:04:21.198082260 +0100 @@ -19,7 +19,7 @@ %global pkg_name vty %global pkgver %{pkg_name}-%{version} Name: ghc-%{pkg_name} -Version: 6.6 +Version: 6.7 Release: 0 Summary: A simple terminal UI library License: BSD-3-Clause ++++++ vty-6.6.tar.gz -> vty-6.7.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/vty-6.6/CHANGELOG.md new/vty-6.7/CHANGELOG.md --- old/vty-6.6/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 +++ new/vty-6.7/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 @@ -1,4 +1,17 @@ +6.7 +--- + +API changes: + +* `Graphics.Vty.Image`: added `rewriteAttrs` for performing arbitrary + attribute transformations over images + +Other improvements: + +* Improved image performance by re-using known text string widths + (thanks Andrzej Rybczak) + 6.6 --- diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/vty-6.6/README.md new/vty-6.7/README.md --- old/vty-6.6/README.md 2001-09-09 03:46:40.000000000 +0200 +++ new/vty-6.7/README.md 2001-09-09 03:46:40.000000000 +0200 @@ -150,6 +150,14 @@ - Patches written completely or partially by AI are unlikely to be accepted. Please disclose any AI use. + - Use good commit hygiene: each commit should make a single, + independent logical change and its commit message should clearly + describe the motivation for that change and what it does at a high + level. If a commit changes something that has tests, the commit + should also include test changes as well, or add new tests if + possible. "WIP" commits, commits that mix up style and substance + (e.g. reformatting style while also adding a feature), etc., are to + be avoided. - If you want to take on big things, talk to me first; let's have a design/vision discussion before you start coding. Create a GitHub issue and we can use that as the place to hash things out. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/vty-6.6/src/Graphics/Vty/Image/Internal.hs new/vty-6.7/src/Graphics/Vty/Image/Internal.hs --- old/vty-6.6/src/Graphics/Vty/Image/Internal.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/vty-6.7/src/Graphics/Vty/Image/Internal.hs 2001-09-09 03:46:40.000000000 +0200 @@ -9,6 +9,7 @@ , imageWidth , horizJoin , vertJoin + , rewriteAttrs , ppImageStructure , clipText @@ -121,6 +122,26 @@ | EmptyImage deriving (Eq, Generic, Show, Read) +-- | Rewrite all attributes in the image using the specified +-- transformation. +rewriteAttrs :: (Attr -> Attr) -> Image -> Image +rewriteAttrs f i = + case i of + HorizText { attr = a } -> + i { attr = f a } + HorizJoin { partLeft = l, partRight = r } -> + i { partLeft = rewriteAttrs f l + , partRight = rewriteAttrs f r + } + VertJoin { partTop = t, partBottom = b } -> + i { partTop = rewriteAttrs f t + , partBottom = rewriteAttrs f b + } + Crop { croppedImage = c } -> + i { croppedImage = rewriteAttrs f c } + BGFill {} -> i + EmptyImage -> i + -- | pretty print just the structure of an image. ppImageStructure :: Image -> String ppImageStructure = go 0 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/vty-6.6/src/Graphics/Vty/Image.hs new/vty-6.7/src/Graphics/Vty/Image.hs --- old/vty-6.6/src/Graphics/Vty/Image.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/vty-6.7/src/Graphics/Vty/Image.hs 2001-09-09 03:46:40.000000000 +0200 @@ -42,6 +42,7 @@ , translate , translateX , translateY + , rewriteAttrs -- * Character width functions , safeWcwidth , safeWcswidth diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/vty-6.6/src/Graphics/Vty/PictureToSpans.hs new/vty-6.7/src/Graphics/Vty/PictureToSpans.hs --- old/vty-6.6/src/Graphics/Vty/PictureToSpans.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/vty-6.7/src/Graphics/Vty/PictureToSpans.hs 2001-09-09 03:46:40.000000000 +0200 @@ -247,7 +247,7 @@ -- addMaybeClipped :: forall s . Image -> BlitM s () addMaybeClipped EmptyImage = return () -addMaybeClipped (HorizText a textStr ow _cw) = do +addMaybeClipped (HorizText a textStr ow cw) = do -- This assumes that text spans are only 1 row high. s <- use skipRows when (s < 1) $ do @@ -258,7 +258,7 @@ if leftClipped || rightClipped then let textStr' = clipText textStr leftClip rightClip in addUnclippedText a textStr' - else addUnclippedText a textStr + else snocOp (TextSpan a ow cw textStr) =<< use rowOffset addMaybeClipped (VertJoin topImage bottomImage _ow oh) = do when (imageHeight topImage + imageHeight bottomImage > 0) $ addMaybeClippedJoin "vert_join" skipRows remainingRows rowOffset diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/vty-6.6/vty.cabal new/vty-6.7/vty.cabal --- old/vty-6.6/vty.cabal 2001-09-09 03:46:40.000000000 +0200 +++ new/vty-6.7/vty.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,5 +1,5 @@ name: vty -version: 6.6 +version: 6.7 license: BSD3 license-file: LICENSE author: AUTHORS
