Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v
diff -u -r1.110 -r1.111
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	11 Sep 2024 06:15:48 -0000	1.110
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	8 Oct 2024 12:51:44 -0000	1.111
@@ -246,7 +246,7 @@
                 lappend address_list [string tolower [parse_email_address -email $email]]
             }
 
-            array unset address_array
+            unset address_array
             # now get the user_names and user_ids
             foreach email $address_list {
                 set email [string tolower $email]