anchor.diff:  (defun find-os-package (name)
     (manager-find-os-package (manager) name))
   
  -(export-always 'manager-find-os-package)
   (defgeneric manager-find-os-package (manager name)
     (:method ((manager manager) name)
       (declare (ignorable name))
  
positive.code: (defun install-manifest (manifest &optional profile)
    (manager-install-manifest (manager) manifest profile))
  
  (export-always 'manager-install-manifest)
  (defmethod manager-install-manifest ((manager manager) manifest &optional profile)
    (run (append (install-manifest-command manager profile)
                 (list manifest))))
  
negative.code: (defun uninstall (package-list &optional profile)
    (manager-uninstall (manager) package-list profile))
  
  (defmethod manager-uninstall ((manager manager) package-list &optional profile)
    (run (append (uninstall-command manager profile)
                 (mapcar #'name package-list))))
  