anchor.diff:                (progn
                   (log:debug "Forward to ~s's renderer (no request-resource-hook handlers)."
                              buffer)
  -                (webkit:webkit-policy-decision-use response-policy-decision)
  -                nil)
  +                (webkit:webkit-policy-decision-use response-policy-decision))
                 (let ((request-data
                         (hooks:run-hook
                          (request-resource-hook buffer)
  
positive.code:                    ;; start the new load request, or else WebKit will be
                     ;; confused about which URL to load.
                     (webkit:webkit-policy-decision-ignore response-policy-decision)
                     (webkit:webkit-web-view-load-request (gtk-object buffer) request)
                     nil))))
            (progn
              (log:debug "Don't forward to ~s's renderer (non request data)."
                         buffer)
              (webkit:webkit-policy-decision-ignore response-policy-decision)
              nil)))))
  
  (define-ffi-method on-signal-load-changed ((buffer gtk-buffer) load-event)
    ;; `url' can be nil if buffer didn't have any URL associated
  
negative.code:                   ((not (typep request-data 'request-data))
                     (log:debug "Don't forward to ~s's renderer (non request data)."
                                buffer)
                     (webkit:webkit-policy-decision-ignore response-policy-decision))
                    ((quri:uri= url (url request-data))
                     (log:debug "Forward to ~s's renderer (unchanged URL)."
                                buffer)
                     (webkit:webkit-policy-decision-use response-policy-decision))
                    (t
                     ;; Low-level URL string, we must not render the puni codes so use
                     ;; `quri:render-uri'.
  