Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package ghc-distribution-opensuse for 
openSUSE:Factory checked in at 2022-02-15 23:57:28
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-distribution-opensuse (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-distribution-opensuse.new.1956 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-distribution-opensuse"

Tue Feb 15 23:57:28 2022 rev:3 rq:954685 version:1.1.3

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/ghc-distribution-opensuse/ghc-distribution-opensuse.changes
      2020-12-22 11:38:42.329454683 +0100
+++ 
/work/SRC/openSUSE:Factory/.ghc-distribution-opensuse.new.1956/ghc-distribution-opensuse.changes
    2022-02-15 23:57:55.116318271 +0100
@@ -1,0 +2,6 @@
+Sun Feb 13 09:10:19 UTC 2022 - Peter Simons <[email protected]>
+
+- Update distribution-opensuse to version 1.1.3.
+  Upstream does not provide a changelog file.
+
+-------------------------------------------------------------------

Old:
----
  distribution-opensuse-1.1.1.tar.gz

New:
----
  distribution-opensuse-1.1.3.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-distribution-opensuse.spec ++++++
--- /var/tmp/diff_new_pack.uY7Wy2/_old  2022-02-15 23:57:55.556319486 +0100
+++ /var/tmp/diff_new_pack.uY7Wy2/_new  2022-02-15 23:57:55.560319497 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-distribution-opensuse
 #
-# Copyright (c) 2020 SUSE LLC
+# Copyright (c) 2022 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -18,7 +18,7 @@
 
 %global pkg_name distribution-opensuse
 Name:           ghc-%{pkg_name}
-Version:        1.1.1
+Version:        1.1.3
 Release:        0
 Summary:        Types, functions, and tools to manipulate the openSUSE 
distribution
 License:        BSD-3-Clause

++++++ distribution-opensuse-1.1.1.tar.gz -> distribution-opensuse-1.1.3.tar.gz 
++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/distribution-opensuse-1.1.1/distribution-opensuse.cabal 
new/distribution-opensuse-1.1.3/distribution-opensuse.cabal
--- old/distribution-opensuse-1.1.1/distribution-opensuse.cabal 2018-07-23 
17:55:33.000000000 +0200
+++ new/distribution-opensuse-1.1.3/distribution-opensuse.cabal 2001-09-09 
03:46:40.000000000 +0200
@@ -1,5 +1,5 @@
 name:               distribution-opensuse
-version:            1.1.1
+version:            1.1.3
 synopsis:           Types, functions, and tools to manipulate the openSUSE 
distribution
 description:        This library is a loose collection of types, functions, 
and tools that
                     users and developers of the
@@ -8,7 +8,8 @@
 license-file:       LICENSE
 author:             Peter Simons
 maintainer:         [email protected]
-tested-with:        GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.3
+tested-with:        GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.4, GHC == 8.6.5, 
GHC == 8.8.4, GHC == 8.10.7
+                  , GHC == 9.0.2, GHC == 9.2.1
 category:           Distribution
 homepage:           https://github.com/peti/distribution-opensuse/
 bug-reports:        https://github.com/peti/distribution-opensuse/issues
@@ -55,17 +56,12 @@
                     , time
                     , turtle
   default-language:   Haskell2010
-  default-extensions: MonadFailDesugaring
-  ghc-options:        -Wall -Wcompat -Wincomplete-uni-patterns 
-Wincomplete-record-updates
-                      -Wredundant-constraints
 
 executable guess-changelog
   main-is:            guess-changelog.hs
   build-depends:      base, containers, distribution-opensuse, text, turtle
   default-language:   Haskell2010
-  default-extensions: MonadFailDesugaring
-  ghc-options:        -Wall -Wcompat -Wincomplete-uni-patterns 
-Wincomplete-record-updates
-                      -Wredundant-constraints -threaded
+  ghc-options:        -threaded
 
 test-suite test-strip-space
   type:               exitcode-stdio-1.0
@@ -73,6 +69,4 @@
   hs-source-dirs:     tests
   build-depends:      base, distribution-opensuse
   default-language:   Haskell2010
-  default-extensions: MonadFailDesugaring
-  ghc-options:        -Wall -Wcompat -Wincomplete-uni-patterns 
-Wincomplete-record-updates
-                      -Wredundant-constraints -threaded
+  ghc-options:        -threaded
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/distribution-opensuse-1.1.1/src/OpenSuse/GuessChangeLog.hs 
new/distribution-opensuse-1.1.3/src/OpenSuse/GuessChangeLog.hs
--- old/distribution-opensuse-1.1.1/src/OpenSuse/GuessChangeLog.hs      
2018-07-23 17:55:33.000000000 +0200
+++ new/distribution-opensuse-1.1.3/src/OpenSuse/GuessChangeLog.hs      
2001-09-09 03:46:40.000000000 +0200
@@ -112,12 +112,19 @@
 unDiff (Both txt _) = txt
 unDiff (Second txt) = txt
 
+-- | This function finds any file in the given directory path that looks like
+-- it might be a change log, meaning its name contains the word "change" and
+-- its suffix is not one that obviously designates source code.
+
 findChangeLogFiles :: FilePath -> Shell FilePath
 findChangeLogFiles dirPath =
   onFiles (grepText changelogFilePattern) (filename <$> ls dirPath)
 
 changelogFilePattern :: Pattern Text
-changelogFilePattern = star dot <> asciiCI "change" <> star dot
+changelogFilePattern = star dot <> asciiCI "change" <* invert codeSuffixPattern
+
+codeSuffixPattern :: Pattern Text
+codeSuffixPattern = choice [suffix ".hs", suffix ".c", suffix ".cpp"]
 
 -- * Utility Functions
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/distribution-opensuse-1.1.1/src/OpenSuse/Types/Issue.hs 
new/distribution-opensuse-1.1.3/src/OpenSuse/Types/Issue.hs
--- old/distribution-opensuse-1.1.1/src/OpenSuse/Types/Issue.hs 2018-07-23 
17:55:33.000000000 +0200
+++ new/distribution-opensuse-1.1.3/src/OpenSuse/Types/Issue.hs 2001-09-09 
03:46:40.000000000 +0200
@@ -9,9 +9,8 @@
 import OpenSuse.Prelude
 
 import Data.Aeson
-import Data.List
+import Data.List ( isSuffixOf )
 import Data.Text ( unpack )
-import GHC.Generics ( Generic )
 import Text.Read
 
 data Issue = Bsc Natural
@@ -32,8 +31,9 @@
 showIssue (Bsc n) = "bsc#" ++ show n
 
 parseCve :: String -> Issue
-parseCve cve = Cve (safeRead "cve-year" y) (safeRead "cve-number" n)
-  where (y,'-':n) = break (=='-') cve
+parseCve cve = case break (=='-') cve of
+                 (y,'-':n) -> Cve (safeRead "cve-year" y) (safeRead 
"cve-number" n)
+                 _         -> error ("malformed CVE: " ++ show cve)
 
 parseBsc :: String -> Issue     -- TODO: 
https://gitlab.suse.de/l3ms/smelt/issues/184
 parseBsc bsc = Bsc (safeRead "bsc number" (stripFixmeSuffix bsc))

Reply via email to