From d18323e55843fd090168c487519968d92c6ebe37 Mon Sep 17 00:00:00 2001
From: fvogel <fvogelnew1@free.fr>
Date: Sun, 4 Oct 2015 13:52:17 +0000
Subject: Fixed -cleanup section in test text-25.22

---
 tests/text.test | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/text.test b/tests/text.test
index 023aedf..a85edfa 100644
--- a/tests/text.test
+++ b/tests/text.test
@@ -3272,7 +3272,7 @@ test text-25.22 {patch 1669632 (v) - <<Clear>> is atomic} -setup {
     event generate .top.t <<Undo>>
     .top.t get 1.0 "1.0 lineend"
 } -cleanup {
-    destroy .t
+    destroy .top.t .top
 } -result "This A an example text"
 
 test text-26.1 {bug fix - 624372, ControlUtfProc long lines} {
-- 
cgit v0.12