From e287a11c4387382277c31735504fc762c33b4cee Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Wed, 12 Oct 2022 06:48:14 -0400
Subject: Switch to Catbird engine.

---
 guix.scm | 21 ++++++++++-----------
 1 file changed, 10 insertions(+), 11 deletions(-)

(limited to 'guix.scm')

diff --git a/guix.scm b/guix.scm
index 8af9ae2..fe0f2a8 100644
--- a/guix.scm
+++ b/guix.scm
@@ -82,7 +82,7 @@ SDL2 C shared library via the foreign function interface.")
       (license license:lgpl3+))))
 
 (define chickadee
-  (let ((commit "5ed490cac58d9f548bc141cc334c25dea9bfcaf2"))
+  (let ((commit "4047c0d0a92eae8a7394b4caa479d0cb6dd9017c"))
     (package
      (name "chickadee")
      (version (string-append "0.8.0-1." (string-take commit 7)))
@@ -93,7 +93,7 @@ SDL2 C shared library via the foreign function interface.")
                     (commit commit)))
               (sha256
                (base32
-                "1wq1v19qp2q31ybjqzw0xccyw5v03hh9y79z8rjd6l83vbp1nvkx"))))
+                "14aa9bkwrsfl8i81zd0fzn0xryyhn8ac16hwdzx40p5az86nq7k6"))))
      (build-system gnu-build-system)
      (arguments
       '(#:make-flags '("GUILE_AUTO_COMPILE=0")
@@ -119,19 +119,19 @@ Scheme.  It contains all of the basic components needed to develop
      (home-page "https://dthompson.us/projects/chickadee.html")
      (license license:gpl3+))))
 
-(define starling
-  (let ((commit "bd8b5d1f0f7c043c4bef2191a3def7b9fa3efacf"))
+(define catbird
+  (let ((commit "09ca74f15f987f2214dd567fc54a7a8d4f01295a"))
     (package
-     (name "starling")
+     (name "catbird")
      (version (string-append "0.1.0-1." (string-take commit 7)))
      (source (origin
               (method git-fetch)
               (uri (git-reference
-                    (url "https://git.dthompson.us/starling.git")
+                    (url "https://git.dthompson.us/catbird.git")
                     (commit commit)))
               (sha256
                (base32
-                "15hmbb8ksl26hp0cqar08i84hn8x4mrk4agq5v2gd69l23lrkq7k"))))
+                "1r4ifk7wrxbxhv2p49090xvdgb6vnnql91l61cs7l0la5lpq92wm"))))
      (build-system gnu-build-system)
      (arguments
       '(#:make-flags '("GUILE_AUTO_COMPILE=0")
@@ -144,9 +144,8 @@ Scheme.  It contains all of the basic components needed to develop
      (inputs (list target-guile))
      (propagated-inputs (list chickadee guile-sdl2))
      (synopsis "Game engine for Guile Scheme")
-     (description "Starling is a game engine that I haven't released
-yet.")
-     (home-page "https://git.dthompson.us/starling.git")
+     (description "Catbird is a game engine for Guile.")
+     (home-page "https://git.dthompson.us/catbird.git")
      (license license:gpl3+))))
 
 (define %source-dir (dirname (current-filename)))
@@ -191,7 +190,7 @@ yet.")
                                "exec " guile)))))))))
   (native-inputs (list autoconf automake pkg-config))
   (inputs (list target-guile))
-  (propagated-inputs (list starling))
+  (propagated-inputs (list catbird))
   (synopsis "Autum Lisp Game Jam 2021 entry")
   (description "Dave's Autumn Lisp Game 2021 entry.")
   (home-page "https://git.dthompson.us/autumn-lisp-game-jam-2021.git")
-- 
cgit v1.2.3