From db95de6f2b27bd808ce75f8acce62fe81d985475 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 26 Mar 2024 13:06:52 -0400 Subject: [PATCH] clean up windows build warnings about unused imports --- Utility/FileSystemEncoding.hs | 7 ++++--- Utility/Terminal.hs | 1 - 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Utility/FileSystemEncoding.hs b/Utility/FileSystemEncoding.hs index 2a1dc81bc1..10c87ca2f3 100644 --- a/Utility/FileSystemEncoding.hs +++ b/Utility/FileSystemEncoding.hs @@ -21,17 +21,18 @@ module Utility.FileSystemEncoding ( truncateFilePath, ) where -import qualified GHC.Foreign as GHC import qualified GHC.IO.Encoding as Encoding import System.IO -import System.IO.Unsafe import System.FilePath.ByteString (RawFilePath, encodeFilePath, decodeFilePath) import qualified Data.ByteString as S import qualified Data.ByteString.Lazy as L -import Data.ByteString.Unsafe (unsafePackMallocCStringLen) #ifdef mingw32_HOST_OS import qualified Data.ByteString.UTF8 as S8 import qualified Data.ByteString.Lazy.UTF8 as L8 +#else +import qualified GHC.Foreign as GHC +import System.IO.Unsafe +import Data.ByteString.Unsafe (unsafePackMallocCStringLen) #endif {- Makes all subsequent Handles that are opened, as well as stdio Handles, diff --git a/Utility/Terminal.hs b/Utility/Terminal.hs index 7fe3640bc1..d449ddda1e 100644 --- a/Utility/Terminal.hs +++ b/Utility/Terminal.hs @@ -16,7 +16,6 @@ module Utility.Terminal ( import System.IO #ifdef mingw32_HOST_OS import System.Win32.MinTTY (isMinTTYHandle) -import System.Win32.File import System.Win32.Types import Graphics.Win32.Misc import Control.Exception