diff options
| author | EuAndreh <eu@euandre.org> | 2024-08-23 19:17:16 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2024-08-23 19:21:28 -0300 |
| commit | 65f6bb0ad4b9a20a8da5bd36269e1b347cfcf2cd (patch) | |
| tree | c6b6c72a309e15b89a271341e15c238bf9cec7b9 /src/guix/system.scm | |
| parent | system.scm: Greatly simplify go-latest by using (options->transformation ...) (diff) | |
| download | asami-65f6bb0ad4b9a20a8da5bd36269e1b347cfcf2cd.tar.gz asami-65f6bb0ad4b9a20a8da5bd36269e1b347cfcf2cd.tar.xz | |
Move src/versions/$P/version => src/versions/$P.txt; remove "sha256" file
Diffstat (limited to 'src/guix/system.scm')
| -rw-r--r-- | src/guix/system.scm | 23 |
1 files changed, 9 insertions, 14 deletions
diff --git a/src/guix/system.scm b/src/guix/system.scm index c27f602..3f767bf 100644 --- a/src/guix/system.scm +++ b/src/guix/system.scm @@ -23,20 +23,6 @@ -(define (cat name s) - (string-trim-right - (pkg:slurp - (string-append "src/versions/" name "/" s)))) - -(define (latest pkg) - (let* ((name (package-name pkg)) - (version (cat name "version")) - (trans-fn (options->transformation - `((with-commit . ,(pkg:fmt "~a=~a" name version)))))) - (trans-fn pkg))) - - - (define +working-dir+ ;; src/guix/system.scm + ../../../ = ./ (dirname (dirname (dirname (current-filename))))) @@ -60,6 +46,15 @@ +(define (latest pkg) + (let* ((name (package-name pkg)) + (version (file (pkg:fmt "src/versions/~a.txt" name))) + (trans-fn (options->transformation + `((with-commit . ,(pkg:fmt "~a=~a" name version)))))) + (trans-fn pkg))) + + + (define package-symbols '()) |