diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 287e2afb04..ade627857b 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -6051,17 +6051,17 @@ (define-public rust-cmake-0.1
     (license (list license:asl2.0
                    license:expat))))
 
-(define-public rust-cocoa-0.23
+(define-public rust-cocoa-0.24
   (package
     (name "rust-cocoa")
-    (version "0.23.0")
+    (version "0.24.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "cocoa" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1cj4c2axmg7aiid2786mpzj7wxpd582biv7c7yimqfnggp002hn5"))))
+        (base32 "0cp8hsajmi7gini22bmlsf9dac7cap7x1k169vxhwlr3j8p90qvg"))))
     (build-system cargo-build-system)
     (arguments
      `(#:skip-build? #t
@@ -6079,6 +6079,30 @@ (define-public rust-cocoa-0.23
     (description "This package provides bindings to Cocoa for macOS.")
     (license (list license:expat license:asl2.0))))
 
+(define-public rust-cocoa-0.23
+  (package
+    (inherit rust-cocoa-0.24)
+    (name "rust-cocoa")
+    (version "0.23.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "cocoa" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1cj4c2axmg7aiid2786mpzj7wxpd582biv7c7yimqfnggp002hn5"))))
+    (arguments
+     `(#:skip-build? #t
+       #:cargo-inputs
+       (("rust-bitflags" ,rust-bitflags-1)
+        ("rust-block" ,rust-block-0.1)
+        ("rust-cocoa-foundation" ,rust-cocoa-foundation-0.1)
+        ("rust-core-foundation" ,rust-core-foundation-0.9)
+        ("rust-core-graphics" ,rust-core-graphics-0.22)
+        ("rust-foreign-types" ,rust-foreign-types-0.3)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-objc" ,rust-objc-0.2))))))
+
 (define-public rust-cocoa-0.22
   (package
     (inherit rust-cocoa-0.23)