mirror of
https://github.com/gentoo-mirror/gentoo.git
synced 2025-12-21 21:17:37 -08:00
4184202494
Patch (by me) to allow earlier template-haskell versions. Tests pass with network-sandbox, thanks to eroen for reporting. Fix: dbus depends on nonexistent version of lens #1360, thanks to Hypoon for reporting. Closes: https://github.com/gentoo-haskell/gentoo-haskell/issues/1360 Closes: https://bugs.gentoo.org/575254 Signed-off-by: Mark Wright <gienah@gentoo.org>
15 lines
506 B
Diff
15 lines
506 B
Diff
--- dbus-1.2.27-orig/lib/DBus/Generation.hs 2022-07-13 00:32:15.000000000 +1000
|
|
+++ dbus-1.2.27/lib/DBus/Generation.hs 2022-11-15 11:11:32.291154128 +1100
|
|
@@ -148,7 +148,11 @@
|
|
makeFromVariantApp name = AppE (VarE 'T.fromVariant) $ VarE name
|
|
|
|
makeJustPattern :: Name -> Pat
|
|
+#if MIN_VERSION_template_haskell(2,18,0)
|
|
makeJustPattern name = ConP 'Just [] [VarP name]
|
|
+#else
|
|
+makeJustPattern name = ConP 'Just [VarP name]
|
|
+#endif
|
|
|
|
mapOrHead ::
|
|
(Num a, Eq a) => a -> (t -> b) -> [t] -> ([b] -> b) -> b
|