anchor.diff:  %%------------------------ Erl mechanism --------------------------------
   
   erl(#mod{method = Method} = ModData, ESIBody, Modules) 
  -  when (Method =:= "GET") orelse (Method =:= "HEAD") ->
  +  when (Method =:= "GET") orelse (Method =:= "HEAD") orelse (Method =:= "DELETE") ->
       ?hdrt("erl", [{method, Method}]),
       case httpd_util:split(ESIBody,":|%3A|/",2) of
   	{ok, [ModuleName, FuncAndInput]} ->
  
positive.code: 	    {proceed, [{status,{400, none, BadRequest}} | ModData#mod.data]}
      end;
  
  erl(#mod{request_uri  = ReqUri, 
  	 method       = "PUT",
           http_version = Version, 
  	 data         = Data}, _ESIBody, _Modules) ->
      ?hdrt("erl", [{method, put}]),
      {proceed, [{status,{501,{"PUT", ReqUri, Version},
  			?NICE("Erl mechanism doesn't support method PUT")}}|
  	       Data]};
  
  erl(#mod{request_uri  = ReqUri, 
  	 method       = "DELETE",
           http_version = Version, 
  	 data         = Data}, _ESIBody, _Modules) ->
      ?hdrt("erl", [{method, delete}]),
      {proceed,[{status,{501,{"DELETE", ReqUri, Version},
  		       ?NICE("Erl mechanism doesn't support method DELETE")}}|
  	      Data]};
  
  erl(#mod{request_uri  = ReqUri, 
  	 method       = "PATCH",
           http_version = Version, 
  	 data         = Data}, _ESIBody, _Modules) ->
      ?hdrt("erl", [{method, patch}]),
      {proceed, [{status,{501,{"PATCH", ReqUri, Version},
  			?NICE("Erl mechanism doesn't support method PATCH")}}|
  	       Data]};
  
  erl(#mod{method      = "POST", 
  	 entity_body = Body} = ModData, ESIBody, Modules) ->
      ?hdrt("erl", [{method, post}]),
      case httpd_util:split(ESIBody,":|%3A|/",2) of
  	{ok,[ModuleName, Function]} ->
  
negative.code: 			     Function, Body, [{entity_body, Body}]);
  	{ok, BadRequest} ->
  	    {proceed,[{status, {400, none, BadRequest}} | ModData#mod.data]}
      end;
  
  erl(#mod{request_uri  = ReqUri, 
  	 method       = "PATCH",
           http_version = Version, 
  	 data         = Data}, _ESIBody, _Modules) ->
      ?hdrt("erl", [{method, patch}]),
      {proceed, [{status,{501,{"PATCH", ReqUri, Version},
  			?NICE("Erl mechanism doesn't support method PATCH")}}|
  	       Data]}.
  
  generate_webpage(ModData, ESIBody, [all], Module, FunctionName,
  		 Input, ScriptElements) ->
  