Make sure .balloonhelp doesn't exist if we try to create it.

2026-04-16 06:18:47 +02:00 · 2025-11-02 09:16:23 -05:00
parent 291f648d2e
commit d22f9979a5
1 changed files with 1 additions and 0 deletions
--- a/scripts/tkremind.in
+++ b/scripts/tkremind.in
@@ -4176,6 +4176,7 @@ proc details_popup { pairs } {
    global Balloon
    set maxwid 80
    set h .balloonhelp
+    catch { destroy $h }
    set c 0
    toplevel $h -bg #000000
    frame $h.l -padx 0 -pady 0 -highlightthickness 0 -relief flat -bd 0 -bg #FFFFC0