summaryrefslogtreecommitdiff
path: root/Command
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-05-11 18:23:41 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-05-11 18:23:41 -0400
commit618af8b6772d25ab27336d240ecddae7ae207561 (patch)
tree9e48ea32c7cbe11603ab599b5e0616457cd4de4e /Command
parentdb56fab07ddd6910b1dc08f4fa242c267c469eb5 (diff)
clean up from windows porting
Diffstat (limited to 'Command')
-rwxr-xr-xCommand/TransferKeys.hs2
-rw-r--r--Command/WebApp.hs4
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