From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 26 Mar 2024 17:16:33 +0000 (-0400)
Subject: avoid build warning on windows
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~25^2~51
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=a69871491ffee25d5d811d2e0d438ce952392123;p=git-annex.git

avoid build warning on windows

Since append was only exported by Annex.Common on unix, excluding it
from import caused a build warning on windows.
---

diff --git a/Annex/Branch.hs b/Annex/Branch.hs
index 42942d886f..9b5365b456 100644
--- a/Annex/Branch.hs
+++ b/Annex/Branch.hs
@@ -52,7 +52,7 @@ import Control.Concurrent.MVar
 import qualified System.FilePath.ByteString as P
 import System.PosixCompat.Files (isRegularFile)
 
-import Annex.Common hiding (append)
+import Annex.Common
 import Types.BranchState
 import Annex.BranchState
 import Annex.Journal
diff --git a/Annex/Common.hs b/Annex/Common.hs
index 13174c0b37..0fc602205a 100644
--- a/Annex/Common.hs
+++ b/Annex/Common.hs
@@ -12,5 +12,5 @@ import Annex.Debug as X (fastDebug, debug)
 import Messages as X
 import Git.Quote as X
 #ifndef mingw32_HOST_OS
-import System.Posix.IO as X hiding (createPipe)
+import System.Posix.IO as X hiding (createPipe, append)
 #endif