From c79ad66dfd949a1a1373294f0fb32ead6d7a44e5 Mon Sep 17 00:00:00 2001
From: ian <ian>
Date: Fri, 20 Oct 2006 10:41:22 +0000
Subject: [PATCH] Do not adns_cancel in the middle of adns_forallqueries

---
 adns/adns.c      | 2 ++
 debian/changelog | 7 +++++++
 2 files changed, 9 insertions(+)

diff --git a/adns/adns.c b/adns/adns.c
index 14ea50c..2a86f4a 100644
--- a/adns/adns.c
+++ b/adns/adns.c
@@ -305,6 +305,8 @@ static void destroy_resolver(Tcl_Interp *ip, Resolver *res) {
       adns_forallqueries_begin(res->ads);
       aqu= adns_forallqueries_next(res->ads, &query_v);
       if (!aqu) break;
+      assert(query_v->aqu == aqu);
+      query_v->aqu= 0; /* avoid disrupting the adns query list */
       asynch_query_dispose(ip, query_v);
     }
     adns_finish(res->ads);
diff --git a/debian/changelog b/debian/changelog
index 569227a..76235c6 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,10 @@
+chiark-tcl (1.0.2) unstable; urgency=low
+
+  Bugfixes:
+  * Do not adns_cancel in the middle of adns_forallqueries.
+
+ --
+
 chiark-tcl (1.0.1) unstable; urgency=low
 
   New features:
-- 
2.30.2