Advertisement
Guest User

Untitled

a guest
Mar 13th, 2021
91
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Scheme 0.56 KB | None | 0 0
  1. (define-module (blueberry guix utils)
  2.   #:use-module (ice-9 match)
  3.   #:use-module (srfi srfi-1)
  4.   #:use-module (srfi srfi-11)
  5.   #:use-module (guix packages)
  6.   #:use-module (guix profiles)
  7.   #:use-module (guix git-download)
  8.   #:use-module (gnu packages)
  9.   #:export (lists-of-packages->manifest
  10.             specifications->packages))
  11.  
  12. (define-syntax-rule (lists-of-packages->manifest packages ...)
  13.   (packages->manifest
  14.    (delete-duplicates (append packages ...) eq?)))
  15.  
  16. (define-public (specifications->packages . spec)
  17.  (map specification->package spec))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement