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 list-manifests ()
    (manager-list-manifests (manager)))
  
  (export-always 'manager-list-manifests)
  (defmethod manager-list-manifests ((manager manager))
    (uiop:directory-files (uiop:ensure-directory-pathname manifest-directory)))
  
  
negative.code: (defun install (package-list &optional profile)
    (manager-install (manager) package-list profile))
  
  (defmethod manager-install ((manager manager) package-list &optional profile)
    (run (append (install-command manager profile) (mapcar #'name package-list))))
  
  