diff options
author | Peter Andersson <[email protected]> | 2011-09-29 15:17:37 +0200 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2011-09-29 15:18:43 +0200 |
commit | 5f04095f2c991a1d2e2c40bfa609342ac9ff9ebe (patch) | |
tree | 5171e4db75b9551233a13f6cf0eb8add063d1e12 | |
parent | e78be5c09eda6a8738d07d801dd8935f3eaa5400 (diff) | |
download | otp-5f04095f2c991a1d2e2c40bfa609342ac9ff9ebe.tar.gz otp-5f04095f2c991a1d2e2c40bfa609342ac9ff9ebe.tar.bz2 otp-5f04095f2c991a1d2e2c40bfa609342ac9ff9ebe.zip |
Correct "Missing Suites" link
OTP-9592
-rw-r--r-- | lib/common_test/src/ct_logs.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/common_test/src/ct_logs.erl b/lib/common_test/src/ct_logs.erl index 3798f26f7b..faec461775 100644 --- a/lib/common_test/src/ct_logs.erl +++ b/lib/common_test/src/ct_logs.erl @@ -838,6 +838,7 @@ make_one_index_entry1(SuiteName, Link, Label, Success, Fail, UserSkip, AutoSkip, "" end end, + CtRunDir = filename:dirname(filename:dirname(Link)), {Lbl,Timestamp,Node,AllInfo} = case All of {true,OldRuns} -> @@ -847,7 +848,6 @@ make_one_index_entry1(SuiteName, Link, Label, Success, Fail, UserSkip, AutoSkip, _ -> NodeOrDate end, N = ["<TD ALIGN=right><FONT SIZE=-1>",Node1,"</FONT></TD>\n"], - CtRunDir = filename:dirname(filename:dirname(Link)), L = ["<TD ALIGN=center><FONT SIZE=-1><B>",Label,"</FONT></B></TD>\n"], T = ["<TD><FONT SIZE=-1>",timestamp(CtRunDir),"</FONT></TD>\n"], CtLogFile = filename:join(CtRunDir,?ct_log_name), @@ -866,7 +866,7 @@ make_one_index_entry1(SuiteName, Link, Label, Success, Fail, UserSkip, AutoSkip, if NotBuilt == 0 -> ["<TD ALIGN=right>",integer_to_list(NotBuilt),"</TD>\n"]; true -> - ["<TD ALIGN=right><A HREF=\"",?ct_log_name,"\">", + ["<TD ALIGN=right><A HREF=\"",filename:join(CtRunDir,?ct_log_name),"\">", integer_to_list(NotBuilt),"</A></TD>\n"] end, FailStr = |