From 53232455297dbab723d498eb43545104b21219e0 Mon Sep 17 00:00:00 2001
From: Dianne Skoll <dianne@skoll.ca>
Date: Fri, 24 Oct 2025 08:49:14 -0400
Subject: [PATCH] Use wm protocol WM_DELETE_WINDOW on the .edit modal as well.

---
 scripts/tkremind.in | 1 +
 1 file changed, 1 insertion(+)

diff --git a/scripts/tkremind.in b/scripts/tkremind.in
index 8547b733..70f481c0 100644
--- a/scripts/tkremind.in
+++ b/scripts/tkremind.in
@@ -2666,6 +2666,7 @@ proc EditReminder {rem args} {
     pack .edit.t -side top -fill both -expand 1
     pack .edit.f -side top -fill x -expand 1
     bind .edit <KeyPress-Escape> ".edit.but1 flash; .edit.but1 invoke"
+    wm protocol .edit WM_DELETE_WINDOW { .edit.but1 flash; .edit.but1 invoke }
     set ModifyDialogResult 0
     CenterWindow .edit .
     tkwait visibility .edit