anchor.diff:      ;; decides when redraw, it has more control.
       (prompt-render-suggestions prompt-buffer)))
   
  -(define-command-prompt select-previous-page (prompt-buffer &key (steps 1))
  -  "Select entry by STEPS previous page in prompt buffer.
  -If STEPS is negative, go to next pages instead."
  -  (select-next-page :prompt-buffer prompt-buffer :steps (- steps)))
  +(define-command-prompt select-previous-page (prompt-buffer &key (n 1))
  +  "Select entry by N previous pages in PROMPT-BUFFER.
  +If N is negative, go to next pages instead."
  +  (select-next-page :prompt-buffer prompt-buffer :n (- n)))
   
   (define-command-prompt return-selection (prompt-buffer)
     "Have the PROMPT-BUFFER return the selection, then quit."
     (prompter:return-selection prompt-buffer))
   
   (defun make-attribute-suggestion (attribute &optional source input)
  -  "Return a `suggestion' wrapping around ATTRIBUTE."
  +  "Return a `suggestion' wrapped around ATTRIBUTE."
     (declare (ignore source input))
     (make-instance 'prompter:suggestion
                    :value attribute
  
positive.code:           (prompter:return-selection prompt-buffer action)))))
  
  (define-command-prompt run-selection-action (prompt-buffer)
    "Run follow-mode function over selected suggestion without closing PROMPT-BUFFER."
    (prompter:call-selection-action prompt-buffer))
  
  (define-command-prompt cancel-input (prompt-buffer) ; TODO: Rename.
    "Close the prompt-buffer without further action."
    (prompter:destroy prompt-buffer))
  
  (define-command-prompt toggle-selection-actions-enabled (prompt-buffer)
    "Close the prompt-buffer without further action."
    (prompter:toggle-selection-actions-enabled prompt-buffer))
  
  (define-command-prompt toggle-mark (prompt-buffer &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
  select next."
    (prompter:toggle-mark prompt-buffer)
  
negative.code:         (echo "Prompt buffer has no history."))))
  
  (define-command-prompt insert-selection (prompt-buffer)
    "Insert current selection default property in the PROMPT-BUFFER input."
    (alex:when-let ((selection (prompter:attributes-default
                                (prompter:selected-suggestion prompt-buffer))))
      (nyxt:set-prompt-buffer-input selection)))
  