diff --git a/System/Posix/Temp/PosixString.hsc b/System/Posix/Temp/PosixString.hsc
index 88c7332..b647898 100644
--- a/System/Posix/Temp/PosixString.hsc
+++ b/System/Posix/Temp/PosixString.hsc
@@ -67,7 +67,7 @@ mkstemp :: PosixString -> IO (PosixPath, Handle)
 mkstemp (PosixString template') = do
   let template = PosixString $ template' `BC.append` (BC.pack [_X,_X,_X,_X,_X,_X])
   withFilePath template $ \ ptr -> do
-    fd <- throwErrnoIfMinus1 "mkstemp" (c_mkstemp ptr)
+    fd <- throwErrnoIfMinus1Retry "mkstemp" (c_mkstemp ptr)
     name <- peekFilePath ptr
     h <- fdToHandle (Fd fd)
     return (name, h)
diff --git a/changelog.md b/changelog.md
index e6d6dfc..adca2cc 100644
--- a/changelog.md
+++ b/changelog.md
@@ -5,6 +5,7 @@
   * add `haveStatx`
   * fix `statx.stx_mnt_id` detection on buggy glibc, see [GHC #24072](https://gitlab.haskell.org/ghc/ghc/-/issues/24072)
   * allow building with newer filepath/os-string
+  * Use `throwErrnoIfMinus1Retry` for mkstemp
 
 ## 2.8.3.0 *Oct 2023*