From a3cbb54e2fbd5b508fa621cabbd4a696d3e28b73 Mon Sep 17 00:00:00 2001 From: Peter Lemenkov <lemenkov@gmail.com> Date: Thu, 21 Oct 2010 16:37:46 +0400 Subject: [PATCH 1/2] No such function - os:getenv/1 in R11B Signed-off-by: Peter Lemenkov <lemenkov@gmail.com> --- src/etap.erl | 12 +++++++++--- 1 files changed, 9 insertions(+), 3 deletions(-) diff --git a/src/etap.erl b/src/etap.erl index 24673a7..4b25ae8 100644 --- a/src/etap.erl +++ b/src/etap.erl @@ -97,10 +97,15 @@ end_tests() -> %% @private ensure_coverage_starts() -> - case os:getenv("COVER") of + case catch os:getenv("COVER") of false -> ok; + {'EXIT', _} -> ok; _ -> - BeamDir = case os:getenv("COVER_BIN") of false -> "ebin"; X -> X end, + BeamDir = case catch os:getenv("COVER_BIN") of + false -> "ebin"; + {'EXIT', _} -> "ebin"; + X -> X + end, cover:compile_beam_directory(BeamDir) end. @@ -108,8 +113,9 @@ ensure_coverage_starts() -> %% @doc Attempts to write out any collected coverage data to the cover/ %% directory. This function should not be called externally, but it could be. ensure_coverage_ends() -> - case os:getenv("COVER") of + case catch os:getenv("COVER") of false -> ok; + {'EXIT', _} -> ok; _ -> filelib:ensure_dir("cover/"), Name = lists:flatten([ -- 1.7.2.3