Index: openacs-4/packages/notifications/tcl/notification-email-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-email-procs.tcl,v
diff -u -N -r1.30 -r1.31
--- openacs-4/packages/notifications/tcl/notification-email-procs.tcl	12 Jan 2008 13:31:38 -0000	1.30
+++ openacs-4/packages/notifications/tcl/notification-email-procs.tcl	12 Jan 2008 17:14:30 -0000	1.31
@@ -59,12 +59,6 @@
         {-object_id:required}
         {-type_id:required}
     } {
-        # DAVEB allow creation user to be the reply address
-        set creation_user [db_string get_creation_user "select creation_user from acs_objects where object_id=:object_id" -default ""]
-        if {![string equal "" $creation_user]} {
-            acs_user::get -user_id $creation_user -array user
-            return "$user(name) <${user(email)}>"
-        }
         if {[empty_string_p $object_id] || [empty_string_p $type_id]} {
             return "\"[address_domain] mailer\" <[reply_address_prefix]@[address_domain]>"
         } else {