aboutsummaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorArun Isaac2022-03-28 15:09:09 +0530
committerArun Isaac2022-03-28 15:09:09 +0530
commitee1d2f8d00003ddff30c9f611ebae859a8ba1ab6 (patch)
treeda27d1c7d5c583cd0e3e3c76f6911c214f9e9456 /guix
parent5a5902b238bc0bcfd528716cca997a3533637ad5 (diff)
downloadguix-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.
Diffstat (limited to 'guix')
-rw-r--r--guix/forge/laminar.scm14
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.