diff options
| author | Arun Isaac | 2022-03-28 15:09:09 +0530 |
|---|---|---|
| committer | Arun Isaac | 2022-03-28 15:09:09 +0530 |
| commit | ee1d2f8d00003ddff30c9f611ebae859a8ba1ab6 (patch) | |
| tree | da27d1c7d5c583cd0e3e3c76f6911c214f9e9456 | |
| parent | 5a5902b238bc0bcfd528716cca997a3533637ad5 (diff) | |
| download | guix-forge-ee1d2f8d00003ddff30c9f611ebae859a8ba1ab6.tar.gz guix-forge-ee1d2f8d00003ddff30c9f611ebae859a8ba1ab6.tar.lz guix-forge-ee1d2f8d00003ddff30c9f611ebae859a8ba1ab6.zip | |
laminar: Suffix .run and .after in script names.
* guix/forge/laminar.scm (forge-laminar-activation): Suffix .run and .after in script names.
| -rw-r--r-- | guix/forge/laminar.scm | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/guix/forge/laminar.scm b/guix/forge/laminar.scm index 5d95372..22c9f9a 100644 --- a/guix/forge/laminar.scm +++ b/guix/forge/laminar.scm @@ -96,12 +96,14 @@ (let ((name (forge-laminar-job-name job)) (run (forge-laminar-job-run job)) (after (forge-laminar-job-after job))) - (cons (list (string-append name ".run") - (program-file name run)) - (if after - (list (list (string-append name ".after") - (program-file name after))) - (list))))) + (cons (let ((run-name (string-append name ".run"))) + (list run-name + (program-file run-name run))) + (if after + (list (let ((after-name (string-append name ".after"))) + (list after-name + (program-file after-name after)))) + (list))))) (forge-laminar-configuration-jobs config))) #$jobs-directory) ;; Set permissions for laminar directory. |