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