anchor.diff:      (remhash window-id windows)))
   
   (define-endpoint |make.buffers| (urls)
  +  (make-buffers urls))
  +
  +(defun make-buffers (urls)
     "Create new buffers from URLs."
     ;; The new active buffer should be the first created buffer.
     (when urls
  
positive.code:     (cond
        (is-new-window
         (log:info "Load ~a in new window" url)
         (|make.buffers| url)
         0)
        ((not is-known-type)
         (log:info "Buffer ~a downloads ~a" buffer url)
  
negative.code:         (set-url-buffer url buffer)))))
  
  (define-endpoint |request.resource| (buffer-id url event-type is-new-window is-known-type
                                                 mouse-button modifiers)
    "Return whether URL should be loaded or not."
    (declare (ignore event-type))
    (log:debug "Mouse ~a, modifiers ~a" mouse-button modifiers)
  