From a1a72e0378b38d6af412fe889b586a11aeab7fee Mon Sep 17 00:00:00 2001
From: Peter Andersson <peppe@erlang.org>
Date: Thu, 23 Feb 2012 18:15:49 +0100
Subject: Fix problem with large fun environment being copied unnecessarily

---
 lib/common_test/src/ct_logs.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/common_test')

diff --git a/lib/common_test/src/ct_logs.erl b/lib/common_test/src/ct_logs.erl
index 7a04bbf58e..5f0626c0b0 100644
--- a/lib/common_test/src/ct_logs.erl
+++ b/lib/common_test/src/ct_logs.erl
@@ -635,11 +635,11 @@ create_io_fun(FromPid, State) ->
     %% we have to build one io-list of all strings
     %% before printing, or other io printouts (made in
     %% parallel) may get printed between this header 
-    %% and footer 
+    %% and footer
+    Fd = State#logger_state.ct_log_fd,
     fun({Str,Args}, IoList) ->
 	    case catch io_lib:format(Str,Args) of
 		{'EXIT',_Reason} ->
-		    Fd = State#logger_state.ct_log_fd,
 		    io:format(Fd, "Logging fails! Str: ~p, Args: ~p~n",
 			      [Str,Args]),
 		    %% stop the testcase, we need to see the fault
-- 
cgit v1.2.3