diff options
| author | EuAndreh <eu@euandre.org> | 2024-08-21 10:33:41 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2024-08-21 10:33:41 -0300 |
| commit | 9dca5ca03cb85726162837ec08c500d4fad32d61 (patch) | |
| tree | eaaa9d962f67de434ebe4a1a4df2e9b5d3a3aba1 /src/org | |
| parent | packages.scm: Include "backupit" in list of packages to build (diff) | |
| download | packages-9dca5ca03cb85726162837ec08c500d4fad32d61.tar.gz packages-9dca5ca03cb85726162837ec08c500d4fad32d61.tar.xz | |
package.scm: Use (let ...) to simplify (etc-entries ...) function
Diffstat (limited to 'src/org')
| -rw-r--r-- | src/org/euandre/packages.scm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/org/euandre/packages.scm b/src/org/euandre/packages.scm index c2f9749..3d8a616 100644 --- a/src/org/euandre/packages.scm +++ b/src/org/euandre/packages.scm @@ -423,11 +423,10 @@ (slurp #$(file-append package path)))))))) (define (etc-entries package paths) - (map - tuple->entry - (map (lambda (path) - (list path package)) - paths))) + (let ((tuples (map (lambda (path) + (list path package)) + paths))) + (map tuple->entry tuples))) (define-public (package-set symbols records) (append |