Index: openacs-4/packages/dotlrn/www/admin/user-new-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-new-2.tcl,v
diff -u -r1.35 -r1.36
--- openacs-4/packages/dotlrn/www/admin/user-new-2.tcl	29 Sep 2013 13:49:46 -0000	1.35
+++ openacs-4/packages/dotlrn/www/admin/user-new-2.tcl	1 Nov 2013 21:08:34 -0000	1.36
@@ -103,7 +103,7 @@
     }
     
     
-    if [catch {acs_mail_lite::send -send_immediately -to_addr $email -from_addr $email_from -subject $subject -body $message} errmsg] {
+    if {[catch {acs_mail_lite::send -send_immediately -to_addr $email -from_addr $email_from -subject $subject -body $message} errmsg]} {
         
         ns_log Error "Error sending email from user-new-2.tcl" $errmsg
         ad_return_error \
@@ -121,7 +121,7 @@
 Message: $message"
 
 
-        if [catch {acs_mail_lite::send -send_immediately -to_addr $email_from -from_addr $email_from -subject $admin_subject -body $admin_message} errmsg] {
+        if {[catch {acs_mail_lite::send -send_immediately -to_addr $email_from -from_addr $email_from -subject $admin_subject -body $admin_message} errmsg]} {
             
             ns_log Error "Error sending email from user-new-2.tcl" $errmsg
             ad_return_error \