diff --git a/ChangeLog b/ChangeLog
index 56a8d12f..5aed44ee 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2024-09-29  Araki Ken  <arakiken@users.sf.net>
+
+	* cocoa.m: window_dealloc() calls [window close] instead of [window release].
+
 2024-09-08  Araki Ken  <arakiken@users.sf.net>
 
 	* im_fcitx.c:
diff --git a/baselib/src/bl_pty_streams.c b/baselib/src/bl_pty_streams.c
index 52f20a9f..84478c08 100644
--- a/baselib/src/bl_pty_streams.c
+++ b/baselib/src/bl_pty_streams.c
@@ -149,7 +149,8 @@ pid_t bl_pty_fork(int *master, int *slave) {
   if ((mode = fcntl(*master, F_GETFL, 0)) == -1 ||
       ((mode & O_NDELAY) == 0 && fcntl(*master, F_SETFL, mode | O_NDELAY) == -1)) {
 #ifdef DEBUG
-    bl_debug_printf(BL_DEBUG_TAG " Failed to set pty master non-blocking.\n");
+    bl_debug_printf(BL_DEBUG_TAG " Failed to set pty master non-blocking. (current mode %x)\n",
+                    mode);
 #endif
   }
 
diff --git a/uitoolkit/quartz/cocoa.m b/uitoolkit/quartz/cocoa.m
index 5e7fbcf4..c05414e3 100644
--- a/uitoolkit/quartz/cocoa.m
+++ b/uitoolkit/quartz/cocoa.m
@@ -1466,7 +1466,7 @@ void window_alloc(ui_window_t *root) {
   [nib release];
 }
 
-void window_dealloc(NSWindow *window) { [window release]; }
+void window_dealloc(NSWindow *window) { [window close]; }
 
 void window_resize(NSWindow *window, int width, int height) {
   CGRect wr = window.frame;