Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-HsYAML for openSUSE:Factory checked in at 2023-10-18 21:25:47 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-HsYAML (Old) and /work/SRC/openSUSE:Factory/.ghc-HsYAML.new.31755 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-HsYAML" Wed Oct 18 21:25:47 2023 rev:23 rq:1118465 version:0.2.1.3 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-HsYAML/ghc-HsYAML.changes 2023-10-08 12:21:45.629582775 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-HsYAML.new.31755/ghc-HsYAML.changes 2023-10-18 21:26:00.149336792 +0200 @@ -1,0 +2,11 @@ +Sat Oct 14 11:01:30 UTC 2023 - Peter Simons <psim...@suse.com> + +- Update HsYAML to version 0.2.1.3. + ### 0.2.1.3 + + _2023-10-14_ + + * Pacify `x-partial` warning of GHC 9.8 + * Tested with GHC 7.10 - 9.8.1 + +------------------------------------------------------------------- Old: ---- HsYAML-0.2.1.2.tar.gz New: ---- HsYAML-0.2.1.3.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-HsYAML.spec ++++++ --- /var/tmp/diff_new_pack.lAny0a/_old 2023-10-18 21:26:00.921364758 +0200 +++ /var/tmp/diff_new_pack.lAny0a/_new 2023-10-18 21:26:00.925364903 +0200 @@ -20,7 +20,7 @@ %global pkgver %{pkg_name}-%{version} %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.2.1.2 +Version: 0.2.1.3 Release: 0 Summary: Pure Haskell YAML 1.2 processor License: GPL-2.0-or-later ++++++ HsYAML-0.2.1.2.tar.gz -> HsYAML-0.2.1.3.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HsYAML-0.2.1.2/ChangeLog.md new/HsYAML-0.2.1.3/ChangeLog.md --- old/HsYAML-0.2.1.2/ChangeLog.md 2001-09-09 03:46:40.000000000 +0200 +++ new/HsYAML-0.2.1.3/ChangeLog.md 2001-09-09 03:46:40.000000000 +0200 @@ -1,5 +1,12 @@ See also http://pvp.haskell.org/faq +### 0.2.1.3 + +_2023-10-14_ + +* Pacify `x-partial` warning of GHC 9.8 +* Tested with GHC 7.10 - 9.8.1 + ### 0.2.1.2 _2023-09-29_ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HsYAML-0.2.1.2/HsYAML.cabal new/HsYAML-0.2.1.3/HsYAML.cabal --- old/HsYAML-0.2.1.2/HsYAML.cabal 2001-09-09 03:46:40.000000000 +0200 +++ new/HsYAML-0.2.1.3/HsYAML.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,6 +1,6 @@ cabal-version: 1.14 name: HsYAML -version: 0.2.1.2 +version: 0.2.1.3 synopsis: Pure Haskell YAML 1.2 processor homepage: https://github.com/haskell-hvr/HsYAML @@ -15,7 +15,7 @@ category: Text build-type: Simple tested-with: - GHC == 9.8.0 + GHC == 9.8.1 GHC == 9.6.3 GHC == 9.4.7 GHC == 9.2.8 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HsYAML-0.2.1.2/src/Data/YAML/Event.hs new/HsYAML-0.2.1.3/src/Data/YAML/Event.hs --- old/HsYAML-0.2.1.2/src/Data/YAML/Event.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/HsYAML-0.2.1.3/src/Data/YAML/Event.hs 2001-09-09 03:46:40.000000000 +0200 @@ -174,13 +174,19 @@ -- consume {Begin,End}Directives and emit DocumentStart event goDirs :: DInfo -> Tok2EvStream - goDirs m (Y.Token { Y.tCode = Y.BeginDirective } : rest) = goDir1 m rest - goDirs m toks0@(Y.Token { Y.tCode = Y.BeginComment} : _) = goComment toks0 (goDirs m) + goDirs m (Y.Token { Y.tCode = Y.BeginDirective } : rest) = + goDir1 m rest + goDirs m toks0@(Y.Token { Y.tCode = Y.BeginComment} : _) = + goComment toks0 (goDirs m) goDirs m (tok@Y.Token { Y.tCode = Y.DirectivesEnd } : rest) | Just (1,mi) <- diVer m = Right (getEvPos (DocumentStart (DirEndMarkerVersion mi)) tok) : go1 m rest | otherwise = Right (getEvPos (DocumentStart DirEndMarkerNoVersion) tok) : go1 m rest - goDirs _ xs@(Y.Token { Y.tCode = Y.BeginDocument } : _) = err xs - goDirs m xs = Right ( getEvPos (DocumentStart NoDirEndMarker) (head xs) ): go1 m xs + goDirs _ xs@(Y.Token { Y.tCode = Y.BeginDocument } : _) = + err xs + goDirs m xs@(tok : _) = + Right (getEvPos (DocumentStart NoDirEndMarker) tok) : go1 m xs + goDirs _ xs = + err xs -- single directive goDir1 :: DInfo -> [Y.Token] -> EvStream diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HsYAML-0.2.1.2/src-test/Main.hs new/HsYAML-0.2.1.3/src-test/Main.hs --- old/HsYAML-0.2.1.2/src-test/Main.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/HsYAML-0.2.1.3/src-test/Main.hs 2001-09-09 03:46:40.000000000 +0200 @@ -146,7 +146,7 @@ forM_ lgrp $ \YT.Token{..} -> do let tText' | null tText = "" | any (== ' ') tText = replicate tLineChar ' ' ++ show tText - | otherwise = replicate (tLineChar+1) ' ' ++ tail (init (show tText)) + | otherwise = replicate (tLineChar+1) ' ' ++ drop 1 (init (show tText)) hPutStrLn stdout $ printf "<stdin>:%d:%d: %-15s| %s" tLine tLineChar (show tCode) tText' hPutStrLn stdout "" hFlush stdout