anchor.diff:        Host := 'www.' + Host;
         AddCustomHeader(Context, 'Location', SockString(
           FormatUTF8('http%://%%', [HTTPS[Context.UseSSL], Host, Path])));
  -      Result := HTML_MOVEDPERMANENTLY;
  +      Result := HTTP_MOVEDPERMANENTLY;
         Exit;
       end;
     end;
  
positive.code:     if not IsContentModified(Context, Asset, bpoEnableCacheByETag in LOptions,
        bpoEnableCacheByLastModified in LOptions) then
      begin
        Result := HTML_NOTMODIFIED;
        Exit;
      end;
      ContentType := ContentTypeWithoutCharset(Asset.ContentType);
      Context.OutContentType := Asset.ContentType;
      Context.OutContent := Asset.Content;
      Result := HTML_SUCCESS;
    end else begin
      Result := inherited Request(Context);
      ContentType := ContentTypeWithoutCharset(Context.OutContentType);
    end;
  
    if ((Result = HTML_BADREQUEST) and (bpoDelegateBadRequestTo404 in LOptions)) or
      ((Result = HTML_FORBIDDEN) and (bpoDelegateForbiddenTo404 in LOptions)) or
      ((Result = HTML_NOTFOUND) and (bpoDelegateNotFoundTo404 in LOptions)) or
      ((bpoDelegateBlocked in LOptions) and
        FastInArray(Ext, FFileTypesBlockedArray)) then
    begin
  
negative.code:           AddCustomHeader(Context, 'Location', SockString(
              FormatUTF8('http%://%%',
                [HTTPS[Context.UseSSL], Host, PathLowerCased])));
            Result := HTTP_MOVEDPERMANENTLY;
            Exit;
          end;
        end;
  