anchor.diff:              %% check on supported namespaces:
               %% - http://www.w3.org/TR/RC-xml-names#dt-prefix
               %% - although strict, not very forgiving towards clients
  -            %NS = H#xmlElement.namespace,
  -            %case NS#xmlNamespace.default of
  -            %    "" ->
  -            %        throw(400);
  -            %    _ -> ok
  -            %end,
  +            %%NS = H#xmlElement.namespace,
  +            %%case NS#xmlNamespace.default of
  +            %%    "" ->
  +            %%        throw(400);
  +            %%    _ -> ok
  +            %%end,
               Value = case H#xmlElement.content of
                           [C] when is_record(C,xmlText) -> C#xmlText.value;
                           _ -> ""
  
positive.code:     ?DEBUG("MKCOL ~p",[A#arg.server_path]),
      Path = davpath(A),
      if
          % RFC2518, 8.3.1
          size(A#arg.clidata) > 0 -> throw(415);
          true -> ok
      end,
  
negative.code:     Path = davpath(A),
      h_if(A,Path),
      R = davresource0(A),
      %% use internal locking to be safe
      case yaws_runmod_lock:lock(R#resource.name,#lock{depth=infinity,scope=exclusive}) of
          {ok,Id} ->
              F = filename:join(A#arg.docroot,["./",R#resource.name]),
  