From 1d9e554eec437e970c69cf55d325103f3f44a817 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Fri, 12 Jan 2024 11:56:56 +0000
Subject: guix: Add G-expression computed-file to build website.

* .guix/run64-package.scm: Import gnu-make from (gnu packages base)
and emacs-minimal from (gnu packages emacs).
(run64-website-gexp, run64-website): New variables.
---
 .guix/run64-package.scm | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/.guix/run64-package.scm b/.guix/run64-package.scm
index 7531af2..f877716 100644
--- a/.guix/run64-package.scm
+++ b/.guix/run64-package.scm
@@ -17,6 +17,8 @@
 ;;; along with run64.  If not, see <https://www.gnu.org/licenses/>.
 
 (define-module (run64-package)
+  #:use-module ((gnu packages base) #:select (gnu-make))
+  #:use-module ((gnu packages emacs) #:select (emacs-minimal))
   #:use-module (guix build-system gnu)
   #:use-module (guix gexp)
   #:use-module (guix git-download)
@@ -44,4 +46,19 @@
     (description "run64 is a SRFI-64 test runner for Scheme.")
     (license license:gpl3+)))
 
+(define run64-website-gexp
+  (with-imported-modules '((guix build utils))
+    #~(begin
+        (use-modules (guix build utils))
+
+        (copy-recursively #$(package-source run64)
+                          (getcwd))
+        (invoke #$(file-append gnu-make "/bin/make")
+                "website"
+                (string-append "EMACS=" #$(file-append emacs-minimal "/bin/emacs")))
+        (copy-recursively "website" #$output))))
+
+(define-public run64-website
+  (computed-file "run64-website" run64-website-gexp))
+
 run64
-- 
cgit v1.2.3