From 34bab6cb5e4bcfe974e3ae06c88891761237ab12 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 8 Sep 2025 18:50:15 +0100
Subject: Replace PlantUML image generation script with Guix computed-file.

---
 .guix/readme-images.scm | 36 ++++++++++++++++++++++++++++++++++++
 doc/generate-images.sh  |  4 ----
 2 files changed, 36 insertions(+), 4 deletions(-)
 create mode 100644 .guix/readme-images.scm
 delete mode 100755 doc/generate-images.sh

diff --git a/.guix/readme-images.scm b/.guix/readme-images.scm
new file mode 100644
index 0000000..5579fd7
--- /dev/null
+++ b/.guix/readme-images.scm
@@ -0,0 +1,36 @@
+;;; pyhegp --- Homomorphic encryption of genotypes and phenotypes
+;;; Copyright © 2025 Arun Isaac <arunisaac@systemreboot.net>
+;;;
+;;; This file is part of pyhegp.
+;;;
+;;; pyhegp is free software: you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation, either version 3 of the License, or
+;;; (at your option) any later version.
+;;;
+;;; pyhegp is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+;;; General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with pyhegp. If not, see <https://www.gnu.org/licenses/>.
+
+(define-module (readme-images)
+  #:use-module ((gnu packages uml) #:select (plantuml))
+  #:use-module (guix gexp))
+
+(define readme-images-gexp
+  (with-imported-modules '((guix build utils))
+    #~(begin
+        (use-modules (guix build utils))
+
+        (invoke #$(file-append plantuml "/bin/plantuml")
+                #$(local-file "../doc/simple-workflow.uml")
+                #$(local-file "../doc/joint-workflow.uml")
+                "-o" #$output))))
+
+(define-public readme-images
+  (computed-file "pyhegp-readme-images" readme-images-gexp))
+
+readme-images
diff --git a/doc/generate-images.sh b/doc/generate-images.sh
deleted file mode 100755
index 0950519..0000000
--- a/doc/generate-images.sh
+++ /dev/null
@@ -1,4 +0,0 @@
-#! /bin/sh
-
-cat simple-workflow.uml | guix shell plantuml -- plantuml -p > simple-workflow.png
-cat joint-workflow.uml | guix shell plantuml -- plantuml -p > joint-workflow.png
-- 
cgit 1.4.1