Index: openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl,v
diff -u -r1.17 -r1.18
--- openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl	11 Sep 2024 06:15:48 -0000	1.17
+++ openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl	8 Oct 2024 12:51:44 -0000	1.18
@@ -1264,8 +1264,8 @@
         }
         set i 0
         while { $i < $chunk_len && $pull_p && [clock seconds ] < $stop_cs } {
-            array unset h_arr
-            array unset p_arr
+            unset -nocomplain h_arr
+            unset -nocomplain p_arr
             set error_p 0
             set aml_email_id [lindex $chunk_ols $i]
             acs_mail_lite::inbound_queue_pull_one \