Index: openacs-4/packages/acs-messaging/tcl/acs-messaging-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-messaging/tcl/acs-messaging-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-messaging/tcl/acs-messaging-procs.tcl	29 Aug 2001 21:22:49 -0000	1.2
+++ openacs-4/packages/acs-messaging/tcl/acs-messaging-procs.tcl	8 Feb 2002 04:52:15 -0000	1.3
@@ -161,7 +161,8 @@
     } {
         # Need to process content to do CRLF conversions?
         set headers [ns_set create]
-        ns_set put $headers Sender "robot@arsdigita.com"
+		
+        ns_set put $headers Sender [ad_parameter "OutgoingSender" "acs-kernel"]
 	if ![string equal $in_reply_to ""] {
 	    ns_set put $headers In-Reply-To "<$in_reply_to>"
 	}