anchor.diff:  
   (define-command install-os-package ()
     "Install select packages."
  -  (let* ((packages (prompt-minibuffer
  +  ;; TODO: Allow profile creation.  Need multi-source support for that?
  +  (let* ((profile (prompt-minibuffer
  +                   :suggestion-function (os-profile-suggestion-filter)
  +                   :input-prompt "Target profile"))
  +         (packages (prompt-minibuffer
                       :suggestion-function (os-package-suggestion-filter)
                       :input-prompt "Install OS package(s)"
                       :multi-selection-p t))
  -         (profile (prompt-minibuffer
  -                   :suggestion-function (os-profile-suggestion-filter)
  -                   :input-prompt "Target profile"))
            ;; TODO: Check for running process.
            (buffer (or (find-buffer 'os-package-manager-mode)
                        (nyxt/os-package-manager-mode:os-package-manager-mode
  
positive.code:     (set-current-buffer buffer)
      buffer))
  
  ;; TODO: Parse Texinfo for Guix descriptions.
  ;; TODO: Add commands:
  ;; - uninstall
  
negative.code:   (let* ((all-packages (ospama:list-packages)))
      (lambda (minibuffer)
        (fuzzy-match (input-buffer minibuffer) all-packages))))
  
  (defun os-installed-package-suggestion-filter (profile)
    (let* ((installed-packages (ospama:list-packages profile)))
      (lambda (minibuffer)
        (fuzzy-match (input-buffer minibuffer) installed-packages))))
  
  (defun os-profile-suggestion-filter ()
    (let* ((all-profiles (ospama:list-profiles)))
  