mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix unused module import warnings when building on windows

Browse source
This commit is contained in:
Joey Hess 2019-08-08 12:18:53 -04:00
parent 81ec673f9b
commit 868942e19b
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
6 changed files with 9 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Annex/FileMatcher.hs
View file

@ -35,8 +35,10 @@ import Types.FileMatcher
import Git.FilePath import Git.FilePath
import Types.Remote (RemoteConfig) import Types.Remote (RemoteConfig)
import Annex.CheckAttr import Annex.CheckAttr
import Annex.Magic
import Git.CheckAttr (unspecifiedAttr) import Git.CheckAttr (unspecifiedAttr)
#ifdef WITH_MAGICMIME
import Annex.Magic
#endif
import Data.Either import Data.Either
import qualified Data.Set as S import qualified Data.Set as S

2
Build/DesktopFile.hs
View file

@ -22,10 +22,12 @@ import Assistant.Install.AutoStart
import Assistant.Install.Menu import Assistant.Install.Menu
import System.Environment import System.Environment
#ifndef mingw32_HOST_OS
import System.PosixCompat.User import System.PosixCompat.User
import Data.Maybe import Data.Maybe
import Control.Applicative import Control.Applicative
import Prelude import Prelude
#endif
systemwideInstall :: IO Bool systemwideInstall :: IO Bool
#ifndef mingw32_HOST_OS #ifndef mingw32_HOST_OS

1
Utility/Env/Set.hs
View file

@ -10,7 +10,6 @@
module Utility.Env.Set where module Utility.Env.Set where
#ifdef mingw32_HOST_OS #ifdef mingw32_HOST_OS
import qualified System.Environment as E
import qualified System.SetEnv import qualified System.SetEnv
import Utility.Env import Utility.Env
#else #else

2
Utility/Gpg.hs
View file

@ -16,10 +16,10 @@ import System.Posix.Types
import System.Posix.IO import System.Posix.IO
import Utility.Env import Utility.Env
import Utility.Env.Set import Utility.Env.Set
import Utility.FileMode
#else #else
import Utility.Tmp import Utility.Tmp
#endif #endif
import Utility.FileMode
import Utility.Format (decode_c) import Utility.Format (decode_c)
import Control.Concurrent import Control.Concurrent

1
Utility/InodeCache.hs
View file

@ -48,7 +48,6 @@ import Data.Time.Clock.POSIX
#ifdef mingw32_HOST_OS #ifdef mingw32_HOST_OS
import Data.Word (Word64) import Data.Word (Word64)
import System.Directory
#else #else
import System.Posix.Files import System.Posix.Files
#endif #endif

6
Utility/Path/Max.hs
View file

@ -11,13 +11,13 @@
module Utility.Path.Max where module Utility.Path.Max where
import System.FilePath import System.FilePath
import Data.List
import Control.Applicative
import Prelude
#ifndef mingw32_HOST_OS #ifndef mingw32_HOST_OS
import Utility.Exception import Utility.Exception
import System.Posix.Files import System.Posix.Files
import Data.List
import Control.Applicative
import Prelude
#endif #endif
{- Maximum size to use for a file in a specified directory. {- Maximum size to use for a file in a specified directory.