(defmethod rucksack-roots-pathname ((rucksack standard-rucksack)) (merge-pathnames "roots" (rucksack-directory rucksack)))