Update guix.scm.

1 files changed, 8 insertions, 12 deletions

diff --git a/guix.scm b/guix.scm
index 4b58214..909f2ad 100644
--- a/guix.scm
+++ b/guix.scm
@@ -63,15 +63,11 @@
   (package
     (inherit guile-opengl)
     (inputs
-     (map (match-lambda
-            (("guile" _)
-             `("guile" ,target-guile))
-            (input input))
-          (package-inputs guile-opengl)))
+     (modify-inputs (package-inputs guile-opengl)
+       (replace "guile" target-guile)))
     (native-inputs
-     (append (package-native-inputs guile-opengl)
-             `(("autoconf" ,autoconf)
-               ("automake" ,automake))))
+     (modify-inputs (package-native-inputs guile-opengl)
+       (append autoconf automake)))
     (arguments
      (substitute-keyword-arguments (package-arguments guile-opengl)
        ((#:phases phases)
@@ -92,7 +88,7 @@
                (invoke "autoreconf" "-vfi")))))))))
 
 (define guile-sdl2
-  (let ((commit "678a2cdd5192ae038f1c1362a5ad0fef9c4b3a4e"))
+  (let ((commit "4811db26a9142ac587649cfa325e0bfc5b9f761e"))
     (package
       (name "guile-sdl2")
       (version (string-append "0.7.0-1." (string-take commit 7)))
@@ -103,7 +99,7 @@
                       (commit commit)))
                 (sha256
                  (base32
-                  "03l5g96w24g1jy62cb0d62nc0amn4qww010zm7kzfmkjyfhfi1r0"))))
+                  "1qd12r0a70g9372bk3hcqz3rhwjlfqsg7vh5qbhb57a9nq5xf3jx"))))
       (build-system gnu-build-system)
       (arguments
        '(#:make-flags '("GUILE_AUTO_COMPILE=0")
@@ -128,7 +124,7 @@ SDL2 C shared library via the foreign function interface.")
       (license license:lgpl3+))))
 
 (define chickadee
-  (let ((commit "40468f62ae07d5b1b2e2e58bfdeda8af4203fd93"))
+  (let ((commit "4a3f324602a057f98d23336f59031c3d10e8bb3b"))
     (package
      (name "chickadee")
      (version (string-append "0.8.0-1." (string-take commit 7)))
@@ -139,7 +135,7 @@ SDL2 C shared library via the foreign function interface.")
                     (commit commit)))
               (sha256
                (base32
-                "1ibd26ar887zl25fq9wjg77v8cqwi9agzh7y2q52gfb0s1spk2r6"))))
+                "1i31lhzzdigbxy8dv594qrcpx2hbkbcrfkbmdh0605n4mn6lfwqr"))))
      (build-system gnu-build-system)
      (arguments
       '(#:make-flags '("GUILE_AUTO_COMPILE=0")