clean up from windows porting

2 files changed, 4 insertions, 2 deletions

diff --git a/Command/TransferKeys.hs b/Command/TransferKeys.hs
index d83170bbc..2f5ea1fe4 100755
--- a/Command/TransferKeys.hs
+++ b/Command/TransferKeys.hs
@@ -9,8 +9,6 @@
 
 module Command.TransferKeys where
 
-import System.PosixCompat.Files
-
 import Common.Annex
 import Command
 import Annex.Content
diff --git a/Command/WebApp.hs b/Command/WebApp.hs
index b4307a21f..705ff6980 100644
--- a/Command/WebApp.hs
+++ b/Command/WebApp.hs
@@ -158,7 +158,11 @@ firstRun listenhost = do
 	sendurlback v _origout _origerr url _htmlshim = putMVar v url
 
 openBrowser :: Maybe FilePath -> FilePath -> String -> Maybe Handle -> Maybe Handle -> IO ()
+#ifdef __ANDROID__
 openBrowser mcmd htmlshim realurl outh errh = do
+#else
+openBrowser mcmd htmlshim _realurl outh errh = do
+#endif
 	hPutStrLn (fromMaybe stdout outh) $ "Launching web browser on " ++ url
 	hFlush stdout
 	environ <- cleanEnvironment