From afbd6fa341f89211697a3c3f59f888b8247aa7f4 Mon Sep 17 00:00:00 2001
From: Peter Andersson \n"
- "Copyright © ", year(),
- " Open Telecom Platform",Node1," \n"],
+ N = ["",Node1," \n"],
CtRunDir = filename:dirname(filename:dirname(Link)),
- T = ["",timestamp(CtRunDir)," \n"],
+ L = ["",Label," \n"],
+ T = ["",timestamp(CtRunDir)," \n"],
CtLogFile = filename:join(CtRunDir,?ct_log_name),
OldRunsLink =
case OldRuns of
[] -> "none";
_ -> "Old Runs"
end,
- A=["CT Log \n",
- "",OldRunsLink," \n"],
- {T,N,A};
+ A=["CT Log \n",
+ "",OldRunsLink," \n"],
+ {L,T,N,A};
false ->
- {"","",""}
+ {"","","",""}
end,
NotBuiltStr =
if NotBuilt == 0 ->
@@ -856,8 +858,8 @@ make_one_index_entry1(SuiteName, Link, Label, Success, Fail, UserSkip, AutoSkip,
{UserSkip+AutoSkip,integer_to_list(UserSkip),ASStr}
end,
["\n",
- " \n"].
total_row(Success, Fail, UserSkip, AutoSkip, NotBuilt, All) ->
- {TimestampCell,AllInfo} =
+ {Label,TimestampCell,AllInfo} =
case All of
- true ->
- {"",SuiteName,"",CrashDumpLink," \n",
- Label,
+ "",SuiteName,"",CrashDumpLink," \n",
+ Lbl,
Timestamp,
"",integer_to_list(Success)," \n",
"",FailStr," \n",
@@ -868,12 +870,14 @@ make_one_index_entry1(SuiteName, Link, Label, Success, Fail, UserSkip, AutoSkip,
AllInfo,
" \n"," \n \n"};
+ true ->
+ {" \n",
+ " \n",
+ " \n \n"};
false ->
- {"",""}
+ {"","",""}
end,
{AllSkip,UserSkipStr,AutoSkipStr} =
@@ -883,6 +887,7 @@ total_row(Success, Fail, UserSkip, AutoSkip, NotBuilt, All) ->
end,
["\n",
" Total ",
+ Label,
TimestampCell,
"",integer_to_list(Success)," \n",
"",integer_to_list(Fail)," \n",
@@ -1047,19 +1052,28 @@ index_footer() ->
footer() ->
["
\n"
- "
\n"
- "Updated: ", current_time(), "
\n"
- "\n"
- "