From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 1 Aug 2023 22:33:39 +0000 (-0400)
Subject: enable TypeOperators
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~36^2~15
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=11db986781c214d0478a03c6b9e6f314a26bd5a0;p=git-annex.git

enable TypeOperators

    The use of ‘~’ without TypeOperators
    will become an error in a future GHC release.

says new ghc
---

diff --git a/Database/Fsck.hs b/Database/Fsck.hs
index cccefefeda..cce5528100 100644
--- a/Database/Fsck.hs
+++ b/Database/Fsck.hs
@@ -12,6 +12,7 @@
 {-# LANGUAGE DataKinds, FlexibleInstances #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE UndecidableInstances #-}
+{-# LANGUAGE TypeOperators #-}
 #if MIN_VERSION_persistent_template(2,8,0)
 {-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE StandaloneDeriving #-}
diff --git a/Remote/S3.hs b/Remote/S3.hs
index 5fa8d97413..b96fc96dcb 100644
--- a/Remote/S3.hs
+++ b/Remote/S3.hs
@@ -6,6 +6,7 @@
  -}
 
 {-# LANGUAGE TypeFamilies #-}
+{-# LANGUAGE TypeOperators #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE BangPatterns #-}
 {-# LANGUAGE RankNTypes #-}