aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2011-11-14 17:29:42 +0100
committerPeter Andersson <[email protected]>2011-11-14 17:29:42 +0100
commit196a453d877e637ea0128ababc07b475492bad37 (patch)
tree0c3122fcff1e81689d1a6107b9c590e626cc6671
parentbe0c9a73c891a8d12a249abf558770f540f316e9 (diff)
downloadotp-196a453d877e637ea0128ababc07b475492bad37.tar.gz
otp-196a453d877e637ea0128ababc07b475492bad37.tar.bz2
otp-196a453d877e637ea0128ababc07b475492bad37.zip
Fix bad error printout
-rw-r--r--lib/common_test/src/ct_logs.erl11
1 files changed, 7 insertions, 4 deletions
diff --git a/lib/common_test/src/ct_logs.erl b/lib/common_test/src/ct_logs.erl
index 6ad962469f..eea03b1db4 100644
--- a/lib/common_test/src/ct_logs.erl
+++ b/lib/common_test/src/ct_logs.erl
@@ -473,23 +473,26 @@ logger(Parent,Mode) ->
put(basic_html, BasicHtml),
%% copy stylesheet to log dir (both top dir and test run
%% dir) so logs are independent of Common Test installation
+ {ok,Cwd} = file:get_cwd(),
CTPath = code:lib_dir(common_test),
CSSFileSrc = filename:join(filename:join(CTPath, "priv"),
?css_default),
- CSSFileDestTop = filename:join(".", ?css_default),
- CSSFileDestRun = filename:join(Dir, ?css_default),
+ CSSFileDestTop = filename:join(Cwd, ?css_default),
+ CSSFileDestRun = filename:join(AbsDir, ?css_default),
case file:copy(CSSFileSrc, CSSFileDestTop) of
{error,Reason0} ->
io:format(user, "ERROR! "++
"CSS file ~p could not be copied to ~p. "++
- "Reason: ~p~n", [CSSFileDestTop, Reason0]),
+ "Reason: ~p~n",
+ [CSSFileSrc,CSSFileDestTop,Reason0]),
exit({css_file_error,CSSFileDestTop});
_ ->
case file:copy(CSSFileSrc, CSSFileDestRun) of
{error,Reason1} ->
io:format(user, "ERROR! "++
"CSS file ~p could not be copied to ~p. "++
- "Reason: ~p~n", [CSSFileDestRun, Reason1]),
+ "Reason: ~p~n",
+ [CSSFileSrc,CSSFileDestRun,Reason1]),
exit({css_file_error,CSSFileDestRun});
_ ->
ok