anchor.diff:      (when action
         (prompter:return-selection prompt-buffer action))))
   
  -(define-command run-follow-mode-function (&optional (prompt-buffer (current-prompt-buffer)))
  +(define-command-prompt run-follow-mode-function ()
     "Run follow-mode function over selected suggestion without closing PROMPT-BUFFER."
     (prompter:call-follow-mode-function prompt-buffer))
   
  -(define-command cancel-input (&optional (prompt-buffer (current-prompt-buffer))) ; TODO: Rename.
  +(define-command-prompt cancel-input () ; TODO: Rename.
     "Close the prompt-buffer without further action."
     (hide-prompt-buffer prompt-buffer))
   
  -(define-command toggle-follow (&optional (prompt-buffer (current-prompt-buffer)))
  +(define-command-prompt toggle-follow ()
     "Close the prompt-buffer without further action."
     (prompter:toggle-follow prompt-buffer))
   
  -(define-command toggle-mark (&key
  -                             (prompt-buffer (current-prompt-buffer))
  -                             (direction :forward))
  +(define-command-prompt toggle-mark (&key (direction :forward))
     "Mark selection.
   Only available if current prompt-buffer source `multi-selection-p' is non-nil.
   DIRECTION can be `:forward' or `:backward' and specifies which suggestion to
  
positive.code:             (nyxt::set-prompt-buffer-input input)))
          (echo "Prompt buffer has no history."))))
  
  (define-command insert-selection (&optional (prompt-buffer (current-prompt-buffer)))
    "Insert current selection default property in the prompt buffer input."
    (alex:when-let ((selection (prompter:attributes-default
                                (prompter:selected-suggestion prompt-buffer))))
  
negative.code:    :value command
     :attributes (nyxt::command-attributes command (parent-prompt-buffer source))))
  
  (define-command-prompt run-prompt-buffer-command ()
    "Prompt for a command to call in PROMPT-BUFFER."
    (let ((command (first (prompt
                           :prompt "Command to run in current prompt buffer"
  