anchor.diff:  (define-command set-url-new-buffer ()
     "Prompt for a URL and set it in a new focused buffer."
     (set-url :new-buffer-p t))
  +
  +(define-command set-url-nosave-buffer ()
  +  "Prompt for a URL and set it in a new focused nosave buffer."
  +  (set-url :new-buffer-p t :nosave-buffer-p t))
   
   (define-command reload-current-buffer (&optional (buffer (current-buffer)))
     "Reload of BUFFER or current buffer if unspecified."
  
positive.code:             (ffi-buffer-evaluate-javascript buffer (quri:url-decode (quri:uri-path url)))
              (ffi-buffer-load buffer url))))))
  
  (define-command set-url (&key new-buffer-p prefill-current-url-p)
    "Set the URL for the current buffer, completing with history."
    (let ((history (minibuffer-set-url-history *browser*)))
      (when history
        (containers:insert-item history (url (current-buffer))))
      (let ((url (prompt-minibuffer
  
negative.code:                                    ;; Make empty buffer, or else there might be
                                     ;; a race condition between the URL that's
                                     ;; loaded and the default one.
                                     (make-buffer-focus :url "" :nosave-buffer-p nosave-buffer-p)
                                     (current-buffer))))))
  
  (define-command set-url-from-current-url ()
  