diff options
| author | Xavier Clerc <xavier.clerc@inria.fr> | 2010-01-22 14:36:57 +0000 |
|---|---|---|
| committer | Xavier Clerc <xavier.clerc@inria.fr> | 2010-01-22 14:36:57 +0000 |
| commit | bcdf4082cf3c3d2fc0ba5c4b10ee9d192b22c066 (patch) | |
| tree | c5f7f8c99991fcf2b4df40b4debe9733f3883390 /ocamlbuild/ocamlbuild_unix_plugin.ml | |
| parent | 04b1656222698bd7e92f213e9a718b7a4185643a (diff) | |
Support for parametrized tags (N. Pouillard et al.)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@9548 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamlbuild/ocamlbuild_unix_plugin.ml')
| -rw-r--r-- | ocamlbuild/ocamlbuild_unix_plugin.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ocamlbuild/ocamlbuild_unix_plugin.ml b/ocamlbuild/ocamlbuild_unix_plugin.ml index c562d4288..3eaaf1743 100644 --- a/ocamlbuild/ocamlbuild_unix_plugin.ml +++ b/ocamlbuild/ocamlbuild_unix_plugin.ml @@ -58,7 +58,8 @@ let run_and_open s kont = in close (); res let stdout_isatty () = - Unix.isatty Unix.stdout + Unix.isatty Unix.stdout && + try Unix.getenv "TERM" <> "dumb" with Not_found -> true let execute_many = let exit i = raise (My_std.Exit_with_code i) in |