anchor.diff:      begin
         AddCustomHeader(Context, 'Location', SockString(
           FormatUTF8('https://%%', [Host, Path])));
  -      Result := HTML_MOVEDPERMANENTLY;
  +      Result := HTTP_MOVEDPERMANENTLY;
         Exit;
       end;
     end;
  
positive.code:       Host := 'www.' + Host;
        AddCustomHeader(Context, 'Location', SockString(
          FormatUTF8('http%://%%', [HTTPS[Context.UseSSL], Host, Path])));
        Result := HTML_MOVEDPERMANENTLY;
        Exit;
      end;
    end;
  
negative.code:       Delete(Host, 1, 4);
        AddCustomHeader(Context, 'Location', SockString(
          FormatUTF8('http%://%%', [HTTPS[Context.UseSSL], Host, Path])));
        Result := HTTP_MOVEDPERMANENTLY;
        Exit;
      end;
    end;
  