Index: openacs-4/packages/acs-admin/www/users/user-batch-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/user-batch-add-2.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-admin/www/users/user-batch-add-2.tcl	10 Jan 2007 21:22:00 -0000	1.5
+++ openacs-4/packages/acs-admin/www/users/user-batch-add-2.tcl	12 Jul 2009 01:08:22 -0000	1.6
@@ -80,11 +80,11 @@
 	regsub -all "<$key>" $sub_message $value sub_message
     }
     
-    if {[catch {ns_sendmail "$email" "$from" "$subject" "$sub_message"} errmsg]} {
-	ad_return_error "Mail Failed" "The system was unable to send email.  Please notify the user personally.  This problem is probably caused by a misconfiguration of your email system.  Here is the error: 
-<blockquote><pre>
+    if {[catch {acs_mail_lite::send -send_immediately -to_addr $email -from_addr $from -subject $subject -body $sub_message} errmsg]} {
+	ad_return_error "Mail Failed" "<p>The system was unable to send email.  Please notify the user personally.  This problem is probably caused by a misconfiguration of your email system.  Here is the error:</p> 
+<div><code>
 [ad_quotehtml $errmsg]
-</pre></blockquote>"
+</code></div>"
         return
     }