From faa6d863911b8dfaacab83cd608142b7868efe65 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Thu, 5 Mar 2009 18:19:42 +0000
Subject: [PATCH] tweak browser selections

---
 HappsCommand.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/HappsCommand.hs b/HappsCommand.hs
index bfd5aaf67..b9cb5f2ef 100644
--- a/HappsCommand.hs
+++ b/HappsCommand.hs
@@ -117,9 +117,9 @@ openBrowserOn u = trybrowsers browsers u
         putStrLn $ printf "Sorry, I could not start a browser (tried: %s)" $ intercalate ", " browsers
         putStrLn $ printf "Please open your browser and visit %s" u
         return $ ExitFailure 127
-      browsers | os=="darwin"  = ["open -a firefox", "open"]
+      browsers | os=="darwin"  = ["open"]
                | os=="mingw32" = ["firefox","safari","opera","iexplore"]
-               | otherwise     = ["firefox","sensible-browser"]
+               | otherwise     = ["sensible-browser","firefox"]
     -- jeffz: write a ffi binding for it using the Win32 package as a basis
     -- start by adding System/Win32/Shell.hsc and follow the style of any
     -- other module in that directory for types, headers, error handling and