slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions 2 Packages Projects Releases Wiki Activity

make known browsers more generic

Browse Source
This commit is contained in:
Simon Michael 2010-03-09 22:47:28 +00:00
parent 4973b82fb4
commit 44de5419a5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Utils.hs
View File

@ -83,8 +83,8 @@ openBrowserOn u = trybrowsers browsers u
putStrLn $ printf "Please open your browser and visit %s" u putStrLn $ printf "Please open your browser and visit %s" u
return $ ExitFailure 127 return $ ExitFailure 127
browsers | os=="darwin" = ["open"] browsers | os=="darwin" = ["open"]
| os=="mingw32" = ["start","firefox","safari","opera","iexplore"] | os=="mingw32" = ["start"]
| otherwise = ["sensible-browser","firefox"] | otherwise = ["sensible-browser","gnome-www-browser","firefox"]
-- jeffz: write a ffi binding for it using the Win32 package as a basis -- 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 -- start by adding System/Win32/Shell.hsc and follow the style of any
-- other module in that directory for types, headers, error handling and -- other module in that directory for types, headers, error handling and