From 0dd84b647cccaf5c868668262f3989c1e350fabc Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Fri, 12 Jan 2024 12:47:33 +0000 Subject: guix: Add G-expression computed-file to build website. * .guix/guile-email-package.scm: Import coreutils and gnu-make from (gnu packages base), emacs-minimal from (gnu packages emacs), texinfo from (gnu packages texinfo). (guile-email-website-gexp, guile-email-website): New variables. --- .guix/guile-email-package.scm | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) diff --git a/.guix/guile-email-package.scm b/.guix/guile-email-package.scm index 64f74cd..84c4b5a 100644 --- a/.guix/guile-email-package.scm +++ b/.guix/guile-email-package.scm @@ -1,5 +1,5 @@ ;;; guile-email --- Guile email parser -;;; Copyright © 2019, 2023 Arun Isaac +;;; Copyright © 2019, 2023–2024 Arun Isaac ;;; ;;; This file is part of guile-email. ;;; @@ -18,8 +18,11 @@ ;;; . (define-module (guile-email-package) + #:use-module ((gnu packages base) #:select (coreutils gnu-make)) + #:use-module ((gnu packages emacs) #:select (emacs-minimal)) #:use-module ((gnu packages guile-xyz) #:select (guile-email guile2.2-email) #:prefix guix:) + #:use-module ((gnu packages texinfo) #:select (texinfo)) #:use-module (guix gexp) #:use-module (guix git-download) #:use-module (guix packages) @@ -48,4 +51,20 @@ (define-public guile2.2-email (make-guile-email guix:guile2.2-email)) +(define guile-email-website-gexp + (with-imported-modules '((guix build utils)) + #~(begin + (use-modules (guix build utils)) + + (set-path-environment-variable + "PATH" (list "/bin") (list #$coreutils #$emacs-minimal + #$gnu-make #$texinfo)) + (copy-recursively #$(package-source guile-email) + (getcwd)) + (invoke "make" "website") + (copy-recursively "website" #$output)))) + +(define-public guile-email-website + (computed-file "guile-email-website" guile-email-website-gexp)) + guile-email -- cgit v1.2.3