diff --git a/NEWS.md b/NEWS.md
index 70911eac8..a8feaad93 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -5,6 +5,8 @@
 
 - `keras_shape` objects (as returned by `keras3::shape()`) gain `==` and `!=` methods.
 
+- Added compatibility with Keras v3.4.1 (no R user facing changes).
+
 User facing changes with upstream Keras v3.4.0:
 
 - New function:
diff --git a/R/install.R b/R/install.R
index a295fca32..8582dc492 100644
--- a/R/install.R
+++ b/R/install.R
@@ -95,6 +95,10 @@ install_keras <- function(
     packages = NULL
   )
   extra_packages <- unique(extra_packages)
+
+  if(!any(grepl("^numpy[=><!]?", extra_packages)))
+    extra_packages <- c(extra_packages, "numpy<2")
+
   if (length(extra_packages))
     reticulate::py_install(extra_packages, envname = envname)