From ee1d2f8d00003ddff30c9f611ebae859a8ba1ab6 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 28 Mar 2022 15:09:09 +0530
Subject: laminar: Suffix .run and .after in script names.
* guix/forge/laminar.scm (forge-laminar-activation): Suffix .run and
.after in script names.
---
guix/forge/laminar.scm | 14 ++++++++------
1 file changed, 8 insertions(+), 6 deletions(-)
(limited to 'guix/forge')
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.
--
cgit v1.2.3