(Fdelete_frame) [MAC_OS]: Call x_clear_frame_selections.

diff --git a/src/frame.c b/src/frame.c
index d86d29db289b9b1ae8f5f875f6af33c13fd04fee..d757e9357527a85470276e47ff514e7d04e42f7f 100644 (file)
--- a/src/frame.c
+++ b/src/frame.c
@@ -1260,6 +1260,10 @@ The functions are run with one arg, the frame to be deleted.  */)
   if (FRAME_X_P (f))
     x_clear_frame_selections (f);
 #endif
+#ifdef MAC_OS
+  if (FRAME_MAC_P (f))
+    x_clear_frame_selections (f);
+#endif
 
   /* Free glyphs.
      This function must be called before the window tree of the