anchor.diff:      print(major, "=result          skipped: ~s", [Comment1]),
       print(2,"*** Skipping test case #~w ~p ***", [CaseNum,{Mod,Func}]),
       TR = xhtml("<tr valign=\"top\">", ["<tr class=\"",odd_or_even(),"\">"]),
  +    GroupName =	case get_name(Mode) of
  +		    undefined -> "";
  +		    Name      -> cast_to_list(Name)
  +		end,
       print(html,
   	  TR ++ "<td>" ++ Col0 ++ "~s" ++ Col1 ++ "</td>"
   	  "<td>" ++ Col0 ++ "~p" ++ Col1 ++ "</td>"
  +	  "<td>" ++ Col0 ++ "~s" ++ Col1 ++ "</td>"
   	  "<td>" ++ Col0 ++ "~p" ++ Col1 ++ "</td>"
   	  "<td>" ++ Col0 ++ "< >" ++ Col1 ++ "</td>"
   	  "<td>" ++ Col0 ++ "0.000s" ++ Col1 ++ "</td>"
   	  "<td><font color=\"~s\">SKIPPED</font></td>"
   	  "<td>~s</td></tr>\n",
  -	  [num2str(CaseNum),Mod,Func,ResultCol,Comment1]),
  +	  [num2str(CaseNum),Mod,GroupName,Func,ResultCol,Comment1]),
       if CaseNum > 0 ->
   	    {US,AS} = get(test_server_skipped),
   	    case Type of
  
positive.code: 	end,
      OkN = get(test_server_ok),
      FailedN = get(test_server_failed),
      print(html,"<tr><td></td><td><b>TOTAL</b></td><td></td><td></td>"
  	  "<td>~.3fs</td><td><b>~s</b></td><td>~p Ok, ~p Failed~s of ~p</td></tr>\n",
  	  [Time,SuccessStr,OkN,FailedN,SkipStr,OkN+FailedN+SkippedN]).
  
  
negative.code: 		  "<p>~s</p>\n" ++
  		   xhtml("<table bgcolor=\"white\" border=\"3\" cellpadding=\"5\">",
  			 "<table>") ++
  		   "<tr><th>Num</th><th>Module</th><th>Group</th>" ++
  		   "<th>Case</th><th>Log</th><th>Time</th><th>Result</th>" ++
  		   "<th>Comment</th></tr>\n",
  		  [print_if_known(N, {"<i>Executing <b>~p</b> test cases...</i>\n",[N]},
  				  {"",[]})]),
  	    print(html, xhtml("<br>", "<br />")),
  