From 9075f01fa32c9ecae021393b870a23413000f9c4 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Wed, 9 Feb 2022 17:00:26 +0530
Subject: forge: Ungexp reason argument.

* forge/forge.scm (ci-jobs-trigger-gexp): Ungexp reason argument.
---
 forge/forge.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'forge/forge.scm')

diff --git a/forge/forge.scm b/forge/forge.scm
index 4c9fb41..11a1e92 100644
--- a/forge/forge.scm
+++ b/forge/forge.scm
@@ -124,8 +124,8 @@ described by <forge-derivation-job> objects, transform them to
         ;; TODO: Only trigger on updates to the main/master branch.
         (display "Triggering continuous integration jobs..." (current-error-port))
         (newline (current-error-port))
-        (when reason
-          (setenv "LAMINAR_REASON" reason))
+        (when #$reason
+          (setenv "LAMINAR_REASON" #$reason))
         (apply invoke
                #$(file-append laminar "/bin/laminarc")
                "queue" '#$(map forge-laminar-job-name ci-jobs)))))
-- 
cgit v1.2.3