From 6681a77c52df41636feb213d63ba27a759c7e5f4 Mon Sep 17 00:00:00 2001
From: Ned Deily <nad@python.org>
Date: Tue, 2 Nov 2021 17:02:58 -0400
Subject: bpo-44828: Avoid leaving a zombie Save panel. (GH-29369)

Patch by Marc Culler of the Tk project.
---
 Mac/BuildScript/bpo-44828-filedialog-crash-monterey.patch | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Mac/BuildScript/bpo-44828-filedialog-crash-monterey.patch b/Mac/BuildScript/bpo-44828-filedialog-crash-monterey.patch
index 1d06329..0591492 100644
--- a/Mac/BuildScript/bpo-44828-filedialog-crash-monterey.patch
+++ b/Mac/BuildScript/bpo-44828-filedialog-crash-monterey.patch
@@ -18,7 +18,7 @@
  
      if (returnCode >= NSAlertFirstButtonReturn) {
  	Tcl_Obj *resultObj = Tcl_NewStringObj(alertButtonStrings[
-@@ -350,49 +350,41 @@
+@@ -350,49 +350,42 @@
      FilePanelCallbackInfo *callbackInfo)
  {
      NSInteger modalReturnCode;
@@ -85,6 +85,7 @@
 -	    [panel close];
 +			  returnCode:modalReturnCode
 +			 contextInfo:callbackInfo ];
++		[parent endSheet:panel];
  	}
 +    } else {
 +	modalReturnCode = [panel runModal];
-- 
cgit v0.12