diff options
Diffstat (limited to 'net-mail/list-remote-forwards/files/list-remote-forwards-0.0.1-ghc84.patch')
-rw-r--r-- | net-mail/list-remote-forwards/files/list-remote-forwards-0.0.1-ghc84.patch | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/net-mail/list-remote-forwards/files/list-remote-forwards-0.0.1-ghc84.patch b/net-mail/list-remote-forwards/files/list-remote-forwards-0.0.1-ghc84.patch deleted file mode 100644 index bf21a42d5973..000000000000 --- a/net-mail/list-remote-forwards/files/list-remote-forwards-0.0.1-ghc84.patch +++ /dev/null @@ -1,26 +0,0 @@ ---- a/src/OptionalConfiguration.hs -+++ b/src/OptionalConfiguration.hs -@@ -31,2 +31,3 @@ import System.IO.Error ( catchIOError ) - import MxList ( MxList(..) ) -+import qualified Data.Semigroup as S - -@@ -59,2 +60,19 @@ merge_maybes (Just _) (Just y) = Just y - -+instance S.Semigroup OptionalConfiguration where -+ cfg1 <> cfg2 = -+ OptionalConfiguration -+ (merge_maybes (database cfg1) (database cfg2)) -+ (merge_maybes (domain_query cfg1) (domain_query cfg2)) -+ all_excluded_mx -+ (merge_maybes (forward_query cfg1) (forward_query cfg2)) -+ (merge_maybes (host cfg1) (host cfg2)) -+ (merge_maybes (password cfg1) (password cfg2)) -+ (merge_maybes (port cfg1) (port cfg2)) -+ (merge_maybes (username cfg1) (username cfg2)) -+ where -+ -- Use only the latter exclude_mx if there are any. -+ all_excluded_mx = -+ exclude_mx $ if (null (get_mxs $ exclude_mx cfg2)) -+ then cfg1 -+ else cfg2 - |