From 346386f3f7a3a00720e5423fa5900a1b3facb702 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Mon, 20 Jan 2020 20:24:02 +0100
Subject: gnu: Add guile3.0-commonmark.

* gnu/packages/guile-xyz.scm (guile3.0-commonmark): New variable.
(guile-commonmark)[arguments]: Patch configure file.
---
 gnu/packages/guile-xyz.scm | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'gnu/packages/guile-xyz.scm')

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 7d5621eaa4..2e768ad7da 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -2035,6 +2035,15 @@ key-value cache and store.")
                      "3.0 2.2 2.0"))
                   #t))))
     (build-system gnu-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'support-guile-3.0
+           (lambda _
+             (substitute* "configure"
+               (("_guile_versions_to_search=\"2.2")
+                "_guile_versions_to_search=\"3.0 2.2"))
+             #t)))))
     (inputs
      `(("guile" ,guile-2.2)))
     (native-inputs
@@ -2061,6 +2070,12 @@ is no support for parsing block and inline level HTML.")
     (name "guile2.0-commonmark")
     (inputs `(("guile" ,guile-2.0)))))
 
+(define-public guile3.0-commonmark
+  (package
+    (inherit guile-commonmark)
+    (name "guile3.0-commonmark")
+    (inputs `(("guile" ,guile-3.0)))))
+
 (define-public mcron
   (package
     (name "mcron")
-- 
cgit v1.2.3