[PATCH] mes: fix %program not defined error in guile

[Ekaitz Zarraga]

>From e0e560895d385065c365c9e14ed201c920d76022 Mon Sep 17 00:00:00 2001
From: Ekaitz Zarraga <ekaitz@elenq.tech>
Date: Thu, 24 Aug 2023 15:12:58 +0200
Subject: [PATCH] mes: fix %program not defined error in guile

* module/mes/guile.scm (%program): define and export
---
 module/mes/guile.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/module/mes/guile.scm b/module/mes/guile.scm
index 242561f9..92d0d40f 100644
--- a/module/mes/guile.scm
+++ b/module/mes/guile.scm
@@ -51,10 +51,13 @@
             keyword->string
             pmatch-car
             pmatch-cdr
+            %program
             )
   ;;#:re-export (open-input-file open-input-string with-input-from-string)
   )
 
+(define %program #f)
+
 (cond-expand
  (guile-2)
  (guile
-- 
2.41.0