Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-microlens-mtl for
openSUSE:Factory checked in at 2022-08-01 21:30:09
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-microlens-mtl (Old)
and /work/SRC/openSUSE:Factory/.ghc-microlens-mtl.new.1533 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-microlens-mtl"
Mon Aug 1 21:30:09 2022 rev:4 rq:987063 version:0.2.0.2
Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-microlens-mtl/ghc-microlens-mtl.changes
2020-12-22 11:42:41.325680244 +0100
+++
/work/SRC/openSUSE:Factory/.ghc-microlens-mtl.new.1533/ghc-microlens-mtl.changes
2022-08-01 21:30:24.873659151 +0200
@@ -1,0 +2,7 @@
+Mon May 16 04:48:35 UTC 2022 - Peter Simons <[email protected]>
+
+- Update microlens-mtl to version 0.2.0.2.
+ Upstream has not updated the file "CHANGELOG.md" since the last
+ release.
+
+-------------------------------------------------------------------
Old:
----
microlens-mtl-0.2.0.1.tar.gz
New:
----
microlens-mtl-0.2.0.2.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-microlens-mtl.spec ++++++
--- /var/tmp/diff_new_pack.4pZHZN/_old 2022-08-01 21:30:25.465660849 +0200
+++ /var/tmp/diff_new_pack.4pZHZN/_new 2022-08-01 21:30:25.473660872 +0200
@@ -1,7 +1,7 @@
#
# spec file for package ghc-microlens-mtl
#
-# 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 microlens-mtl
Name: ghc-%{pkg_name}
-Version: 0.2.0.1
+Version: 0.2.0.2
Release: 0
Summary: Microlens support for Reader/Writer/State from mtl
License: BSD-3-Clause
++++++ microlens-mtl-0.2.0.1.tar.gz -> microlens-mtl-0.2.0.2.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/microlens-mtl-0.2.0.1/microlens-mtl.cabal
new/microlens-mtl-0.2.0.2/microlens-mtl.cabal
--- old/microlens-mtl-0.2.0.1/microlens-mtl.cabal 2019-06-20
07:43:40.000000000 +0200
+++ new/microlens-mtl-0.2.0.2/microlens-mtl.cabal 2001-09-09
03:46:40.000000000 +0200
@@ -1,5 +1,5 @@
name: microlens-mtl
-version: 0.2.0.1
+version: 0.2.0.2
synopsis: microlens support for Reader/Writer/State from mtl
description:
This package contains functions (like 'view' or '+=') which work on
'MonadReader', 'MonadWriter', and 'MonadState' from the mtl package.
@@ -8,7 +8,7 @@
license: BSD3
license-file: LICENSE
author: Edward Kmett, Artyom Kazak
-maintainer: Monadfix <[email protected]>
+maintainer: Monadfix <[email protected]>
homepage: http://github.com/monadfix/microlens
bug-reports: http://github.com/monadfix/microlens/issues
-- copyright:
@@ -17,14 +17,17 @@
extra-source-files:
CHANGELOG.md
cabal-version: >=1.10
-tested-with: GHC==7.4.2
- GHC==7.6.3
+tested-with: GHC==7.6.3
GHC==7.8.4
GHC==7.10.3
GHC==8.0.2
GHC==8.2.2
GHC==8.4.4
- GHC==8.6.4
+ GHC==8.6.5
+ GHC==8.8.4
+ GHC==8.10.7
+ GHC==9.0.1
+ GHC==9.2.1
source-repository head
type: git
@@ -36,8 +39,8 @@
-- other-extensions:
build-depends: base >=4.5 && <5
, microlens >=0.4 && <0.5
- , mtl >=2.0.1 && <2.3
- , transformers >=0.2 && <0.6
+ , mtl >=2.0.1 && <2.4
+ , transformers >=0.2 && <0.7
, transformers-compat >=0.4 && <1
ghc-options:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/microlens-mtl-0.2.0.1/src/Lens/Micro/Mtl/Internal.hs
new/microlens-mtl-0.2.0.2/src/Lens/Micro/Mtl/Internal.hs
--- old/microlens-mtl-0.2.0.1/src/Lens/Micro/Mtl/Internal.hs 2019-06-18
23:50:16.000000000 +0200
+++ new/microlens-mtl-0.2.0.2/src/Lens/Micro/Mtl/Internal.hs 2001-09-09
03:46:40.000000000 +0200
@@ -51,6 +51,10 @@
import Control.Applicative
+#if MIN_VERSION_mtl(2, 3, 0)
+import Control.Monad (liftM, liftM2)
+#else
+#endif
import Control.Monad.Reader as Reader
import Control.Monad.State as State
import Control.Monad.Trans.State.Lazy as Lazy
@@ -59,9 +63,11 @@
import Control.Monad.Trans.Writer.Strict as Strict
import Control.Monad.Trans.RWS.Lazy as Lazy
import Control.Monad.Trans.RWS.Strict as Strict
+#if !MIN_VERSION_transformers(0, 6, 0)
import Control.Monad.Trans.Error
-import Control.Monad.Trans.Except
import Control.Monad.Trans.List
+#endif
+import Control.Monad.Trans.Except
import Control.Monad.Trans.Identity
import Control.Monad.Trans.Maybe
-- microlens
@@ -87,9 +93,11 @@
type instance Zoomed (Lazy.RWST r w s z) = FocusingWith w z
type instance Zoomed (Strict.WriterT w m) = FocusingPlus w (Zoomed m)
type instance Zoomed (Lazy.WriterT w m) = FocusingPlus w (Zoomed m)
+#if !MIN_VERSION_transformers(0, 6, 0)
type instance Zoomed (ListT m) = FocusingOn [] (Zoomed m)
-type instance Zoomed (MaybeT m) = FocusingMay (Zoomed m)
type instance Zoomed (ErrorT e m) = FocusingErr e (Zoomed m)
+#endif
+type instance Zoomed (MaybeT m) = FocusingMay (Zoomed m)
type instance Zoomed (ExceptT e m) = FocusingErr e (Zoomed m)
------------------------------------------------------------------------------
@@ -386,17 +394,19 @@
zoom l = Lazy.WriterT . zoom (\afb -> unfocusingPlus #. l (FocusingPlus #.
afb)) . Lazy.runWriterT
{-# INLINE zoom #-}
+#if !MIN_VERSION_mtl(2, 3, 0) && !MIN_VERSION_transformers(0, 6, 0)
instance Zoom m n s t => Zoom (ListT m) (ListT n) s t where
zoom l = ListT . zoom (\afb -> unfocusingOn . l (FocusingOn . afb)) .
runListT
{-# INLINE zoom #-}
-instance Zoom m n s t => Zoom (MaybeT m) (MaybeT n) s t where
- zoom l = MaybeT . liftM getMay . zoom (\afb -> unfocusingMay #. l
(FocusingMay #. afb)) . liftM May . runMaybeT
- {-# INLINE zoom #-}
-
instance (Error e, Zoom m n s t) => Zoom (ErrorT e m) (ErrorT e n) s t where
zoom l = ErrorT . liftM getErr . zoom (\afb -> unfocusingErr #. l
(FocusingErr #. afb)) . liftM Err . runErrorT
{-# INLINE zoom #-}
+#endif
+
+instance Zoom m n s t => Zoom (MaybeT m) (MaybeT n) s t where
+ zoom l = MaybeT . liftM getMay . zoom (\afb -> unfocusingMay #. l
(FocusingMay #. afb)) . liftM May . runMaybeT
+ {-# INLINE zoom #-}
instance Zoom m n s t => Zoom (ExceptT e m) (ExceptT e n) s t where
zoom l = ExceptT . liftM getErr . zoom (\afb -> unfocusingErr #. l
(FocusingErr #. afb)) . liftM Err . runExceptT
