ci-manifest.scm 435 B

12345678910111213141516
  1. (use-modules (guix)
  2. (guix packages)
  3. (ice-9 match)
  4. (srfi srfi-1))
  5. (define hoot-inputs
  6. (filter-map
  7. (match-lambda
  8. ((_ (? package? package) output) (list package output))
  9. ((_ (? package? package)) package)
  10. (_ #f)) ; ignore source inputs, etc.
  11. (package-development-inputs
  12. (load (string-append (dirname (current-filename)) "/guix.scm")))))
  13. (packages->manifest hoot-inputs)