From a3ea26b0a952ba3808ab93826f999b8523e4e08e Mon Sep 17 00:00:00 2001
From: glondu
Date: Sun, 27 Jul 2008 22:39:07 +0000
Subject: (Partially) Revert previous commit because of FTBFS

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11272 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 lib/flags.ml | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'lib/flags.ml')

diff --git a/lib/flags.ml b/lib/flags.ml
index 0378e11fb4..4743345de7 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -106,4 +106,7 @@ let browser_cmd_fmt =
   let coq_netscape_remote_var = "COQREMOTEBROWSER" in
   Sys.getenv coq_netscape_remote_var
  with
-  Not_found -> Coq_config.browser
+  Not_found ->
+   if Sys.os_type = "Win32"
+   then "C:\\PROGRA~1\\INTERN~1\\IEXPLORE %s"
+   else "firefox -remote \"OpenURL(%s,new-tab)\" || firefox %s &"
-- 
cgit v1.2.3