anchor.diff:       {erl_script_alias, {"/cgi-bin/erl", [httpd_example, io]}},
        {eval_script_alias, {"/eval", [httpd_example, io]}}
       ] ++  auth_conf(ServerRoot);
  +
  +server_config(http_limit, Config) ->
  +    [{max_clients, 1}]  ++ server_config(http, Config);
  +    
   server_config(_, _) ->
       [].
   
  
positive.code:     {Pid, Port} = server_start(Group, server_config(Group, Config)),
      [{server_pid, Pid}, {port, Port} | Config].
  %%--------------------------------------------------------------------
  init_per_testcase(host = Case, Config) ->
      Prop = ?config(tc_group_properties, Config),
      Name = proplists:get_value(name, Prop),
      Cb = case Name of
  
negative.code: init_per_group(_, Config) ->
      Config.
  end_per_group(http, _Config) ->
      ok;
  end_per_group(https, _Config) ->
      ssl:stop();
  end_per_group(_, _) ->
      ok.
  
  