X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=guix.scm;h=e440327c819bb253ce9d8ea86770ca12773ceba2;hp=09f843b2ddb302c3bd8d675cd9ccefd4555c972b;hb=f0435638778d49bf48bc865b4a768d3118e72397;hpb=7b90b4d923b06999d38c171c882b7023a7c338cd

diff --git a/guix.scm b/guix.scm
index 09f843b..e440327 100644
--- a/guix.scm
+++ b/guix.scm
@@ -74,6 +74,25 @@
               (patches (list (string-append %source-dir
                                             "/build-aux/patch-guile-fix-live-repl.patch")))))))
 
+(define guile-8sync-latest
+  (package
+    (inherit guile-8sync)
+    (version "git")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "git://git.savannah.gnu.org/8sync.git")
+             (commit "dfde2119df2a0adb86ec4921f95ef2c15692a593")))
+       (sha256
+        (base32
+         "086smlch92n6z5xng0la9l9g6m145klw1c8222cgj32qhyarbkpk"))))
+    (arguments
+     `(#:phases (modify-phases %standard-phases
+                  (add-before 'configure 'bootstrap
+                              (lambda _
+                                (zero? (system* "./bootstrap.sh")))))))))
+
 (package
   (name "guile-mudsync")
   (version "git")
@@ -83,11 +102,11 @@
   (build-system gnu-build-system)
   (native-inputs `(("autoconf" ,autoconf)
                    ("automake" ,automake)
-                   ("guile" ,guile-without-select-bug)
-                   ("guile-8sync" ,guile-8sync)
-                   ("guile-irregex" ,guile2.2-irregex)
                    ("pkg-config" ,pkg-config)
                    ("texinfo" ,texinfo)))
+  (inputs `(("guile" ,guile-without-select-bug)
+            ("guile-8sync" ,guile-8sync-latest)
+            ("guile-irregex" ,guile2.2-irregex)))
   (arguments
    `(#:phases (modify-phases %standard-phases
                 (add-before 'configure 'bootstrap